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AKUSTIK-KOPPLER 
Dataphon s21d, 

300 Baud Modem, 

nach CCITT V.21 Standard, 
m. FTZ-Nr. 18.13.1917.00, 
Gebühren- u. anmeldefrei, 
V24/RS-232 Standard- 
Schnittstelle (25-Pin), 
Vollduplexbetrieb, 
Answer-, Originate-und 


Auto-Modus nur DM 298,00 


TELEKOMMUNIKATIONS-KOMPLETT-PAKET 

bestehend aus: 

I Dataphon s21d, 

I Anschlußkabel (RS-232- 
-Schnittstelle zum 
Apple Il-Gameport), 

I Terminalprogramm 

"HIB MODEM-TRANSFER” nur DM 398,00 


BROTHER-Drucker f. alle Apple-Rechner: 
HR-5 (Thermodrucker, 


V.24 oder Centr.-Interf.) DM 499,00 
M-1009 (Matrixdrucker 
mit V.24 + Centronics) DM 799,00 


HR-15 XL (Typenraddr.) 

mit Centronics-Interface DM 1698,00 
mit V.24-Interface DM 1748,00 
Drucker-Anschlußkabel 

für APPLE //c oder 
Macintosh an: HR-5 (V.24), 
HR-15 (V.24), M-1009 DM 114,00 


INFO-COUPON: 
Ich interessiere mich 
besonders für: 









OD Telekommunikation 

D Apple II - Interfaces 

D Apple II - Laufwerke 

OD BROTHER-Drucker 

D Software für Macintosh 
Bitte senden Sie mir ausführ- 
liches Informationsmaterial. 


ABSENDER: 








hib Computerladen 


Äußere Bayreuther Straße 72 
Postfach 21 01 25 


no 


Telefon: 0911/515 939 - Teletex: 2627 - 911 8253 


8500 Nürnberg 21 


LAUFWERKE für den Apple Il 


Sakata-Laufwerk, SFD-155 
(Chinon), I x 40 Track 

(163 K-Byte) komplett 
anschlußf. im Gehäuse DM 
TOSHIBA 2 x 80 Track DM 


AUTO-PATCH-CONTROLLER 
komplett mit Handbuch u. 
Formatierungs-Diskette DM 
DISK-DOPPEL-STATION 

1,2 M-Byte, bestehend aus: 

2 Laufwerke ä 2x80 Track 

im Gehäuse, I Auto-Patch- 
Controller mit Handbuch u. 
Formatierungs-Diskette, 


598,00 | 
648,00 | 


348,00 


anschlußfertig nur DM 1898,00 
SONDERANGEBOT: 
TEAC FD-55F nur DM 598,00 


O 
Computerladen 


INTERFACE-KARTEN für den Apple Il 





16 K-RAM-Card DM 1729,00 
Disk Interface-Card DM 198,00 
Z-80-Card DM 179,00 
80-Zeichen-Card DM 249,00 
Super Serial Card DM 298,00 
128 K RAM-Card DM 498,00 
IC-Test-Karte DM 398,00 
MICROSOFT-Software für den Macintosh: 
Basic Version 2.0 DM 598,00 
Multiplan deutsch DM 848,00 
Chart (Grafik-Paket) DM 498,00 
Word (prof. Textprogr.) DM 778,00 $ 
File (Datenbank) DM 778,00 


als Komplettpaket nur DM 3298,00 


Alle Preise incl. ges. Mehrwertsteuer. Die Berechnung der Versandkosten erfolgt nach 
Entfernung und Gewicht. Fordern Sie noch heute unsere Gratispreisliste an! 
Wiederverkäufer bitte nur schriftlich anfragen (Kopie der Gewerbeanmeldg beilegen). 








Kein Thema wird momentan heftiger dis- 
kutiert als das Kopierwesen in der EDV- 
Branche, denn zur Zeit versucht die Soft- 
ware-Industrie mit allen ihr zur Verfügung 
stehenden Mitteln (strafrechtlich: Haus- 
durchsuchung, Beschlagnahme usw.; zi- 
vilrechtliich: Abmahnung, Schadenersatz 
usw.), den Raubkopierern auf den Pelz zu 
rücken. Deshalb beginnt der vorliegende 
Peeker mit einem Feature über Software 
und Kopierrecht, wobei ich aber im Ge- 
gensatz zu manchen anderen Darstellun- 
gen nicht nur für die Software-Urheber, 
sondern auch für die Software-Benutzer 
Partei ergreifen werde, weil teilweise der 
Versuch unternommen wird, aus dem Ur- 
hebergesetz einen für Software geltenden 
Sonderschutz herauszudeuteln, für den es 
de jure keine Grundlage gibt. Das EDV-Ur- 
heberrecht steht aus zwei Gründen auf 
sehr wackligen Beinen: Zum einen ist im 
deutschen Urheberrechtsgesetz das Sog. 
„Computerwerk“ (= Computerprogramm) 
mit keinem Wort erwähnt und damit auch 
nicht gesondert geregelt. Zum anderen 
gibt es fast keine Software-Streitfälle, die 
in Form von Musterprozessen durch alle 
Instanzen geboxt wurden. Deshalb kann 
man in Detailfragen nur Mutmaßungen 
äußern, indem man die Paragraphen „ana- 
log“ auslegt. 

Beispiel: Programmiersprachen 

Prof. Dr. H. Hubmann ist der Meinung, daß 
Computerwerke den Sprachwerken zuzu- 
ordnen sind: „Gleichgültig ist auch, wel- 
che Sprache gewählt wurde, ob die inlän- 
dische oder eine fremde, ob eine lebende 
oder eine tote, ob eine Kunstsprache, wie 
Esperanto, oder eine Computersprache, 
wie Algol usw. („Urheber- und Verlags- 
recht“, S. 90). An anderer Stelle heißt es: 
„Die Methode und Technik des Schaffens 
sowie die vom Inhalt losgelöste Formge- 
bung als solche sind nicht Gegenstand 
des Urheberschutzes; eine Sprache wie 


editorial 


Esperanto, eine Schrift wie Stenographie 
oder eine Versform sind nicht geschützt“. 
(S. 86). 

Was würde daraus folgen? Wenn Compu- 
terwerke Sprachwerke sind, dann sind 
Computersprachen Sprachen. Da jedoch 
weder Sprachen wie Englisch oder 
Deutsch noch Dialekte wie Hessisch oder 


Schwäbisch Urheberschutz genießen, wä- 


ren auch weder Computersprachen wie 
Pascal oder Basic noch Computerdialekte 
wie Microsoft-Basic oder Wang-Basic ge- 
schützt. Und dies würde konkret bedeu- 
ten: Aus urheberrechtlicher Sicht würde 
jedermann ohne Lizenz Applesoft-Basic 
benutzen dürfen, wie auch jedermann 
Hessisch benutzen darf. 

Man könnte jetzt noch einen Schritt weiter- 
gehen und auch die Betriebssysteme, die 
üblicherweise mit den Programmierspra- 
chen verwoben sind, den Computerspra- 
chen zuordnen. Folglich wären dann Disk- 
Operation-Systems wie CP/M, MS-DOS, 
Apple-Pascal, DOS 3.3 und ProDOS nicht 


urheberrechtlich schutzfähig. Wenn dem 


so wäre, würde dies letztlich einer Sy- 
stemfirma wie Microsoft, die überwiegend 
vom Verkauf selbstentwickelter Program- 
mier- und Betriebssysteme lebt, die Exi- 
stenzgrundlage entziehen, weil jedermann 
die Microsoft-Sprachen unentgeltlich be- 
nutzen dürfte, wie dies ja auch bei Espe- 
ranto der Fall ist. Mit dem gegenwärtigen 
deutschen Urheberrechtsgesetz kommt 
man also hier keinen Schritt weiter. 


vi“ Bas 


Ulrich Stiehl 
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Knock, Knock! 
Who’s there? 


Software und Kopierrecht 


von Ulrich Stiehl 
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Wenn es in diesen Tagen an der Tür klopft, 
ist es möglicherweise nicht der Briefträger 
(„The postman always rings twice...”, 
Cain). Denn zur Zeit findet eine groß ange- 
legte Hausdurchsuchungswelle bei mut- 
maßlichen Raubkopierern statt. Polizisten 
stürmen die Studentenbuden in Karlsruhe 
und anderen Informatik-Hochburgen und 
beschlagnahmen neben den vermuteten 
Schwarzkopien auch Apple-Hardware als 
„Raubkopiererwerkzeug“. Dabei soll es 
dem Vernehmen nach zu peinlichen Ver- 
wechslungen gekommen sein. So wurden 
neben den „Händlern“ auch die Käufer 
belangt. Ferner kassierte die Polizei in Un- 
kenntnis der Sachlage offenbar teils Origi- 
nalprogramme sowie Videobänder, Ton- 
bandkassetten u.a.m. 


Wir sind der Meinung, daß das Kopierun- 


wesen, das inzwischen groteske Formen 
angenommen hat, unbedingt eingedämmt 
werden muß. Es wäre jedoch ratsam, 
wenn man etwas differenzierter vorginge. 
Es genügt nicht, daß man nur die Schüler 
und Studenten anschwärzt und zu den 
Prügelknaben der Nation macht, denn 
auch bei den „offiziellen“ Händlern wird 
zuhauf kopiert. Nur spricht man hier nicht 
von „Schwarzkopien“, sondern verbrä- 
mend von „Sicherungs- und Arbeitsko- 
pien“. 


Aus diesem aktuellen Anlaß befassen wir 
uns nachfolgend in extenso mit der „Ver- 
vielfältigung zum persönlichen Gebrauch“ 
(8 53 UrhG) und zeigen auf, was nach dem 
gegenwärtigen Urheberrechtsgesetz er- 
laubt und verboten ist. Als Quellen benut- 
zen wir „Hubmann, Urheber- und Verlags- 
recht, 4. Aufl., Beck-Verlag“ (kurz Hub- 
mann genannt) sowie „Fromm/Norde- 
mann, Urheberrecht, 5. Aufl., Kohlham- 
mer-Verlag“ (kurz Nordemann genannt). 
Die eingestreuten Schaubilder stammen 
aus meinem „Verlagsbuchhändler“, S. 
66ff. 


Zur Einstimmung in das Thema zunächst 
einige Fakten zum Kopierunwesen, die 
unbewiesen in den Raum gestellt werden. 
Haken Sie einmal ab, was Ihnen bekannt 
vorkommt! 

1. Bibliotheken: „Bibliotheken haben in 
den letzten Jahren Fotokopierautomaten 
aufgestellt, mit denen jeder Bibliotheksbe- 
nutzter fotokopieren kann, was und wieviel 
er will.“ (Nordemann, S. 328) 

2. Kopiershops: „Gewerbliche Fotoko- 
pieranstalten fragen ebenfalls nicht nach 
Zweck und Zahl, wenn ihnen Aufträge er- 
teilt werden.“ (Nordemann, S. 328) 

3. Schulen: „In vielen ... Schulen werden 
.. aus dem Exemplar der Lehrerbücherei 
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oder gar aus einem kostenlosen Ansichts- 
exemplar ganze Kapitel fotokopiert und im 
Unterricht verwendet.“ (Nordemann, S. 
328) 

4. Computerclubs: Die einschlägigen 
Treffen der AUGE usw. dienen meist we- 
niger dem Erfahrungs- als vielmehr dem 
Programmaustausch, wobei die kopierge- 
schützten Programme mittels „Kopien der 
kopiergeschützten Kopierprogramme ko- 
piert“ werden. („Der Tag geht zu Ende, 
Johnny Locksmith kommt...” ) 

5. Hardwarehändler: Bei den Händlern 
sind Kopien von Originalprogrammen oft 
Zugaben zur käuflich erworbenen Hard- 
ware („Kommen Sie mal hinter. Hab’ da 
noch was für Sie...“). 

6. Kleinanzeigen: In Kleinanzeigen vieler 
Zeitschriften werden unter Rubriken wie 
„Verkaufe“ und „Tausche“ Kopien von 
Originalprogrammen angeboten. („Wegen 
Systemwechsel zu verkaufen...“ ). 


1.WASIST EIN COMPUTERWERK? 


Das „Gesetz über Urheberrecht und ver- 
wandte Schutzrechte“ (= Urheberrechts- 
gesetz = UrhG) vom 9. September 1965 
soll die Urheber von Werken der Literatur, 
Wissenschaft und Kunst in bezug auf ihre 
Werke bis zu /O Jahre nach dem Tod des 
Urhebers schützen (8 1 UrhG). Das UrhG 
enumeriert in $ 2, Absatz 1 u.a. folgende 
Werkarten: 

@® Sprachwerke 

® Musikwerke 

® Tanzkunstwerke 

® Kunstwerke 

® Lichtbildwerke 

® Filmwerke 

„Computerwerke“ (= Computerprogram- 
me) werden also nicht gesondert erwähnt. 
Insoweit ist es fraglich, ob Computerpro- 
gramme eine vom gegenwärtigen Gesetz 
noch nicht gesondert erfaßte spezielle 
Werkkategorie darstellen oder den wis- 
senschaftlichen Sprachwerken zu subsu- 
mieren sind. Momentan wird man wohl das 
letztere annehmen müssen, so daß die 
Kopier- und Zitierrecht-Paragraphen, die 
vorwiegend auf wissenschaftliche Sprach- 
werke abheben, analog anzuwenden sind. 
Zumindest dürfte sich der in Druckform 
oder als Datenträger erschienene Quell- 
code eines Programms wegen der verba- 
len Kommentare zweifelsfrei als wissen- 
schaftliches Sprachwerk bezeichnen las- 
sen. In Einzelfällen wird man „Computer- 
werke“ auch den Kunstwerken oder Mu- 
sikwerken zuordnen können, z.B. bei mu- 
sikalisch untermalten Computergrafikpro- 
grammen. 


RECHT ey 


1.1. Persönliche geistige 
Schöpfung 


Als Werk gemäß 8 2, Absatz 2 gilt nur die 
„persönliche geistige Schöpfung”: 


Persönlich besagt, daß das Werk von ei- 
ner natürlichen Person erstellt werden 
muß. Mechanisch, automatisch oder com- 
putermäßig hergestellte Produkte sind 
demzufolge keine urheberrechtlichen 
Werke. So ist beispielsweise der mit Hilfe 
eines Assemblers erstellte Quellcode ei- 
nes Programms ein Werk. Ob jedoch der 
auf dem Quellcode basierende Objekt- 
code ein Werk darstellt, ist umstritten, 
denn dieser wird bekanntlich nicht „per- 
sönlich“, sondern „mechanisch“ per 
Knopfdruck erzeugt. Würde man dagegen 
den Objektcode direkt in Maschinenspra- 
che, d.h. ohne Zuhilfenahme eines As- 
semblers schreiben, so würde auf alle Fäl- 
le ein „persönliches“ Werk geschaffen 
werden. Aus urheberrechtlicher Sicht be- 
steht der Quellcode teils aus Befehlskür- 
zeln, die in einer künstlichen Program- 
miersprache formuliert sind, sowie teils 
aus Kommentaren, die in einer natürlichen 
Sprache geschrieben sind. Der aus dem 
Quellcode durch Assemblierung oder 
auch durch Compilierung entstandene 
Objektcode ist lediglich eine Folge hexa- 
dezimaler Zahlen, die vom Mikroprozessor 
als Maschinenbefehle interpretiert wer- 
den. Eine Zahlenfolge als solche, z.B. die 
dezimale Folge 2, 3, 5, 7, 11, 13...(Prim- 
zahlen), ist nicht automatisch ein Compu- 
terwerk, wie auch eine Tonfolge, z.B. c, d, 
e, f, g, a...(Tonleiter), nicht automatisch ein 
Musikwerk ist. In beiden Fällen fehlt die 
„persönliche“ Note. Der Objektcode ist 
zwar formal betrachtet eine „Überset- 
zung“, doch zweifelsohne keine Überset- 
zung im Sinne einer Bearbeitung ($ 3 
UrhG), wie ja auch die Computerüberset- 
zung, z.B. der Prawda ins Amerikanische, 
kein Werk ist. So gesehen, ist wahrschein- 
lich nur der Quellcode schutzfähig, und 
gerade dieser befindet sich praktisch nie 
auf den Schwarzkopien der Raubkopierer. 


Geistig besagt, daß das Werk im „Ge- 
hirn“ entstanden sein muß. Ein Lied ist ein 
Werk, dagegen die Darbietung des Liedes 
(= Gesang) nur eine Leistung (= ver- 
wandtes Schutzrecht). Ob der Objekt- 
code, wenn er schon, wie wir meinen, kein 
Werk darstellt, so doch wenigstens eine 
„Leistung“ ist, ist ebenfalls umstritten. 
Schon das normale Menschenverstand 
sagt uns, daß die „Knopfdruck“-Assem- 
blierung (für Richter: Man tippt nur das 





Kürzel „ASM“. Damit hat sich die Lei- 
stung) nicht in die gleiche Kategorie wie 
die echten Leistungen (Gedichtsvortrag, 


Gesangsdarbietung 
werden darf. 

Die Entdeckung eines Naturgesetzes (= 
Erfindung) wird nicht vom Urheber-, son- 
dern vom Patentrecht abgedeckt. Auch 
mathematische und logische Gesetze so- 
wie Algorithmen sind grundsätzlich nicht 
schutzfähig. Beispielsweise ist der im Jah- 
re 1962 von C.A.R. Hoare entwickelte 
Quicksort-Algorithmus kein Werk. 


usw.) eingeordnet 


Schöpfung besagt, daß etwas Individuel- 
les geschaffen werden muß, das über das 
Alltägliche hinausgeht und somit Werkcha- 
rakter hat. So fehlt beispielsweise Ge- 
schäftsbriefen meist die „Schöpfungshö- 
he“, während Gedichte fast immer „Werk- 
charakter“ haben. Im Gegensatz zum Pa- 
tentrecht muß eine Schöpfung „neuartig“, 
aber nicht neu sein. Während ein Patent 
grundsätzlich nur dem Ersterfinder erteilt 
wird, wäre im Urheberrecht auch die 
175ste Implementierung von Quicksort 
schutzfähig. Wie verträgt sich dies jedoch 
mit der obigen Aussage? Der theoretische 
Quicksort-Algorithmus als solcher ist nicht 
schutzfähig, wohl aber die individuelle, 
persönliche und zugleich „neuartige“ Im- 
plementierung in einer beliebigen Pro- 
grammiersprache. Je unkomplizierter je- 
doch ein Algorithmus, desto geringer ist 
der Spielraum für „Eigenschöpfungen“. In 
der Tat läßt ein korrektes Quicksort-Modul 
kaum noch Raum für Individualität und 
„Neuartigkeit“. Groteskerweise wäre eine 
fehlerhafte und eben dadurch „individuel- 
le“ Quicksort-Implementierung stets ge- 
schützt, während eine korrekte Implemen- 
tierung eher gemeinfrei (= nicht schutzfä- 
hig) ist. Im Gegensatz zur patentmäßigen 
Erfindung muß ein urheberrechtliches 
Werk nicht „stimmen“. Bekanntlich beruht 
die gesamte schöngeistige Literatur auf 
„erdichteten Dingen“, die nicht wahr sind 
im Sinne tatsächlicher Begebenheiten. 


1.2. Geschützte „Computerwerke“ 


Ein „Computerwerk“ gilt als geschützt, 
wenn es erstens eine persönliche geistige 
Schöpfung darstellt und wenn zweitens 
die Schutzfrist für das Werk noch nicht 
abgelaufen ist. Wegen des Algorithmen- 
charakters wird man jedoch vielen „Com- 
puterwerken“ oder zumindest den algo- 
rthmischen Teilen von „Computerwer- 
ken“ (Sortierroutinen, Rechenroutinen 
usw.) die Schutzfähigkeit absprechen 
müssen. Gleiches dürfte wohl für reine 


„Objektcode-Werke“ gelten, d.h. für Pro- 
gramme, von denen nur der Objektcode 
und nicht zusätzlich der Quellcode veröf- 
fentlicht wird. 

Nach Ablauf der Schutzfrist — d.h. norma- 
lerweise 70 Jahre nach dem Tod des Ur- 
hebers — wird das Werk gemeinfrei und 
darf dann von jedermann benutzt werden. 
Das deutsche Urheberrechtsgesetz 
schützt selbstverständlich zunächst nur 
deutsche Staatsangehörige ($ 120). Auf- 
grund internationaler Urheberrechtsab- 
kommen (insbesondere Welturheber- 
rechtsabkommen und Revidierte Berner 
Übereinkunft) werden Ausländer im Inland 
wie Inländer geschützt (Assimilations- 
prinzip, s. Hubmann, S. 21ff.). Wie vielen 
Lesern sicherlich bekannt ist, sind „Com- 
puterwerke“ im amerikanischen „Copy- 
right Act“ inzwischen gesondert geregelt. 
Diese Regelungen kommen jedoch auf- 
grund des Assimilationsprinzips in der 
Bundesrepublik nicht zur Anwendung, 
weil sich sonst der amerikanische Urheber 
in Deutschland besser stellen würde als 
der deutsche Urheber selbst. Übrigens sei 
an dieser Stelle erwähnt, daß sich das 
eingekreiste „c“ © aus deutscher Sicht 
auf das Welturheberrechtsabkommen be- 
zieht (Artikel Ill: „...bear the symbol © 
accompanied by the name of the copyright 
proprietor and the year of first publica- 
tion...“). In Deutschland selbst sind derar- 
tige Formalitäten nicht erforderlich. 

In den USA liest man oft von Public-Do- 
main-Software, d.h. vom Autor als ge- 
meinfrei erklärten und damit von jeder- 
mann benutzbaren Programmen. In 
Deutschland ist demgegenüber zumindest 
das sog. Urheberpersönlichkeitsrecht (8 
11 UrhG) unveräußerlich, so daß bei- 
spielsweise eine Urheber, der einem 
Computerclub seine Programme kosten- 
Ios zur Verfügung gestellt hat, wegen ge- 
wandelter Überzeugung seine Werke wie- 
der zurückziehen kann (8 42 UrhG). 


1.3. „aeheimwerke“ 


Vorab eine begriffliche Klärung: „Schüt- 
zen“ hat im Rechts- und Computerwesen 
eine unterschiedliche Bedeutung. Ein 
„geschütztes Urheberwerk“ ist eine 
Schutz genießende persönliche geistige 
Schöpfung. Ein „geschütztes Computer- 
werk“ (= „Geheimwerk“) ist ein kopier- 
geschütztes Programm. Ein geschütztes 
Computerwerk ist nicht notwendigerweise 
ein geschütztes Urheberwerk. 

Ein Verlag, der ein Sprachwerk verlegt, ist 
aufgrund des jeweiligen Landespressege- 
setzes verpflichtet, 1 Vervielfältigungs- 


stück an die entsprechende Landesbiblio- 
thek sowie darüber hinaus 1 weiteres Ver- 
vielfältigungsstück an die Deutsche Biblio- 
thek in Frankfurt in /esbarer Form abzulie- 
fern (Pflichtabgabegesetz). Folglich kann 
jeder Urheber anhand des fremden 
Sprachwerkes prüfen, ob sein eigenes 
Werk in urheberrechtlichem Konflikt zu 
dem hinterlegten steht. Dagegen gehört 
es zu den Abnormitäten der „Computer- 
werke“, daß diese häufig in doppelt unles- 
barer Form veröffentlicht werden: Erstens 
erscheint anstelle des Quellcodes vielfach 
nur der unlesbare Objektcode. Zweitens 
erscheint anstelle des ungeschützten 
Codes vielfach nur der kopiergeschützte 
und mithin unlesbare Code. „Computer- 
werke“ werden somit zu „Geheimwer- 
ken“. Sind jedoch „Geheimwerke“ über- 
haupt schutzfähig? 


Beispiel 1 

Ihr holden Schwäne, 

Und trunken von Küssen 
Tunkt ihr das Haupt 

Ins heilig-nüchterne Wasser 


Beispiel 2 

You lovely swans, 

and drunk with kisses 

you dip your heads 

into the sacred sober water 


Beispiel 3 

AO BO C1 24 BC BD BEBF 
00 80 20 30 14 2A 2A SC 
AO 10 11 FF 7B2B 2A 20 
DO EO IF 3A 4C ED FD 60 


Beispiel 1 ist ein Auszug eines Gedichtes 
von Hölderlin („Hälfte des Lebens“). Wür- 
de Hölderlin noch leben, so würde es als 
Originalwerk voll unter den Schutz des 
Urheberrechtsgesetzes fallen. Analoges 
würde für die englische Übersetzung in 
Beispiel 2 gelten, die eine Bearbeitung im 
Sinne von 83 UrhG in Verbindung mit 8 23 
UrhG darstellen würde. Wie steht es je- 
doch mit Beispiel 3? Handelt es sich hier- 
bei um eine weitere Übersetzung in eine 
nur dem Urheber bekannte Geheimspra- 
che oder um ein eigenständiges Produkt in 
der Form eines „unchiffrierten Geheim- 
werkes“, das den vollen Schutz des Urhe- 
berrechts genießt? 

Nehmen wir als fiktiven Rechtsfall an, daß 
ein „Schwarzkopierer“ dieses vom „Ur- 
heber“ veröffentlichte „Werk“ (= Beispiel 
3), weil er dachte, es sei „ungeschützter 
Quatsch“, ohne Einwilligung kopierte und 
auf dem „Markt“ zu verkaufen versuchte, 
worauf der Urheber gegen den Schwarz- 
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B2-Motherboard mit 6502, 65C02C, Z80B, V24, Parallel-Schnittstelle, 80-Zeichenkarte, 


RGB-Ausgang, 192 KB RAM DM 2299,-- 
B3-Motherboard, wie B2, zusätzlich 256 KB Pseudofloppy DM 2899,-- 
Prometric® B2 Tischgerät ab DM 3349,-- 
Prometric” B3 Tischgerät ab DM 3999,-- 
Prometric® Portable B2, Monitor 9” ab DM 4449,-- 
Prometric® Portable B3, Monitor 9” ab DM 4999,-- 


Neu von DRV: C-DOS, das 80-Track DOS für B2 und Kompatible, verarbeitet Integer, DOS 3.3 und 


Prodos-Files DM 149,-—- 
en CALVADOS, deutsche Textverarbeitung DM 299,-- 
TEAC FD55F DM 499,-— YE-DATA 480 DM 694,-— 
TEAC FD 55 B DM 449,-— ERPHI-Controler DM 298,—— 
FDC4-Controler DM 179,-— SUPER-Controler DM 510,-— 
Shugart-Bus-Kabel DM 45,-—- IBM-look Gehäuse DM 218,-—— 
PREH-Commander AK87 DM 279,-— Monitor 15A DM 528,-— 
MONITOR 12A, 22 MHZ DM 355,-- 32K-PRINTER-BUFFER DM 389,-—- 
M100-DRUCKER DM 825,-— MOTHERBOARD 64 KB + Z80 DM 699, -- 
Graphik-Par.- Interface DM 125,-— PSEUDO-FLOPPY 256 KB DM 899,-— 
OPERATOR 2-Tastatur DM 580,-—— 80-Track-Patch CP/m 3.0 DM 75,-- 
Super COM -Tastatur TIMER PLATINE DM 39,-- 
(RENIIBCHE BO/EQUND! DM 369,-— STEP Impuls Verdoppler DM 39,-- 


Z 80 B-Karte 6 MHz (AL 5 comp) DM 799,-— 


Schaltnetzteil 7 Ampere 
80-Zeichenkarte 4 Zeichensätze DM 279, -- 


(VDI gepr.) DM 269,-— 


NEU: 15 MB Winchester Slimline inkl. Controler DM 3699,—— 
Preh Commander AK 106 Starlight-1 21 Funktionstasten DM 359,-— 


Alle Preise inklusive 14% MwSt. Weiteres Zubehör auf Anfrage. 


E. Böhmer, DRV, Am Kellersbusch, 6072 Dreieich, 0 6103 / 84647 








(a) Urheberrecht 


Übertragung des 
Urheberrechts 
(Vererbung) 


nn 


Einräumung des 
Nutzungsrechts 


LS 


(b) Erbe (c) Vermächt- 


nısnehmer 


(b oder c tritt an die Stelle von a) 


(g) Einräumung eines einfachen 
Nutzungsrechts 

(z.B. Lizenzvertrag mit mehreren 
Buchgemeinschaften g I, g II usw.) 
(g I, g II usw. verwerten neben d) 


(d) ausschließ-  (e) einfaches 
liches Nut- Nutzungs- 
zungsrecht recht 

(z.B. Verlags- (z.B. Auffüh- 
recht an einen  rungsrecht an 
Verlag) mehrere Thea- 


(d verwertet ter) (e verwer- 
allein) tet neben a) 


(f) Übertragung des Nutzungs- 
rechts 

(z.B. Verkauf des Verlages) 

(z.B. Lizenzvertrag mit einer 
Buchgemeinschaft) 

(f tritt an die Stelle von d oder e) 





Urheberrechtsverletzung 
Der Kläger hat Anspruch auf 


a) Unterlassung 
bei nicht schuld- oder 


haftem Verhalten, b) Überlassung 


a) Vernichtung 


Bekanntmachung 
des Gerichtsurteils auf 
Kosten des Beklagten 


oder der Vervielfälti- 


b) Schadenersatz 
bei Vorsatz oder 
Fahrlässigkeit 


gungsstücke und 
Druckformen 


Neu im Hüthig Software Service 


SUPERPLOT 


Doupble-Hires-Utility 


Kopieren zum eigenen Gebrauch aus Schriftwerken 
(Bis zu 7 gleiche Kopien, keine Verbreitungsbefugnis) 


Persönlicher Gebrauch 

a) Natürliche Personen 

b) Häuslicher, privater, nichtbe- 
ruflicher Werkgenuß 

c) Werk braucht nicht erschienen 
zu sein 

d) Es können ganze Werke ko- 
piert werden 

e) Keine Vergütungspflicht 


Sonstiger eigener Gebrauch 

a) Natürliche oder juristische 
Personen 

b) Kopien kann man durch Ko- 
pieranstalten herstellen lassen 

c) Eigener Gebrauch (z.B. firmen- 
interner Gebrauch) 

d) Beruflicher/gewerblicher 
Zweck erforderlich 


———— | 


Wissenschaftlicher Gebrauch 


a) Studenten, Privatgelehrte 

b) Rein wissenschaftlicher Zweck; 
nicht gegeben bei Populärwis- 
senschaft (Sachbuch) oder Lite- 
ratur 

c) Es können ganze Werke ko- 
piert werden, soweit geboten 

d) Werke brauchen nicht erschie- 
nen zu sein 

e) keine Vergütungspflicht 


Nicht-wissenschaftlicher, rein 

informatorischer Gebrauch 

a) Es dürfen nur Werkteile oder 
ganze Zeitschriftenaufsätze ko- 
piert werden 

b) Das kopierte Werk muß er- 
schienen sein 

c) Falls ein Werk vergriffen ist, 
darf es auch als ganzes Werk 
kopiert werden 

d) Für gewerbliche Unternehmen 
(Industrie- und Handelsfirmen, 
nicht freie akademische Berufe, 
wie Rechtsanwälte) besteht Ver- 
gütungspflicht 


Hinweis: Eine Novellierung des Kopierrechts (UrhG $ 53, 54) wird vor- 
aussichtlich in naher Zukunft durchgeführt werden. 


von Karl-Walter Bott, Programmdiskette und Manual, DM 48,— 


SUPERPLOT ist eine neue, ungewöhnlich kompakte und schnelle Ampersand-Utility für Double Hires, die einschließlich eines 
vollständigen ASCII-Shape-Zeichensatzes wahlweise in Bank 1 oder Bank 2 der Language Card liegt und damit sowohl unter 
ProDOS als auch unter DOS 3.3, falls letzteres in die LC-Bank geschoben wurde, benutzt und in eigene Applesoftprogramme 
integriert werden kann. SUPERPLOT unterstützt die üblichen HGR-Befehle, denen lediglich ein & vorangestellt werden muß, 
also z. B. & HPLOT 500, 100 TO 500, 150 usw. SUPERPLOT ist speziell für das Plotten von beschrifteten wissenschaftlichen 
Funktionskurven mit hoher Auflösung gedacht und weniger für HGR-Spiele. 


Hüthig Software Service - Postfach 102869 - 6900 Heidelberg 1 
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APPLEI. 
APPLE 
PSCAL 


Sprache 


APALEI PASCAL 


Betriebssystem und 
Sprache 


Erstes deutsches Referenzwerk sämtlicher Befehle 
und Systemroutinen von Apple II Pascal — mit Adden- 
dum einschließlich Version Pascal 1.2! 


Gültig für Apple II, I Plus, Ie einschließlich der 
128K/80 Zeichen-Konfiguration. 


Betriebssystem kommentiert ausführlich und in 
Deutsch Funktion und Benutzung der fast 60 System- 
routinen des Apple II Pascal Betriebssystems. 


Apple II Betriebssystem, 
272 Seiten, DM 49, - 


Apple II Sprache, 
216 Seiten, DM 39,- 


Sprache ist das vollständige, deutsche Referenzwerk 
der „Apple Pascal“-Programmiersprache mit u.a. Infor- 
mationen über professionelle Pascal-Programmierung, 
Turtlegraphics, Programmbibliothek etc. 


Deutsch. 


Pascal 1.2 Addendum, etwa 100 Seiten, 
DM 36,- (1. Quartal ’85) 


In Vorbereitung: Addendum Pascal 1.2, ein 
Zusatz zum Buch „Betriebssystem“ für 1.2-Benutzer in 


„Nach Unterlagen von Apple Deutschland hergestellt“ 


te-wi Verlag GmbH 


= 
Theo-Prosel-Weg I ll 
8000 München 40 


CHE oT 


I APPLEII- 
i Anwenderhandbuch 


(L. Poole) 
Erst mit Hilfe dieses Leitfadens werden Sie 


1 Ihren Apple II erfolgreich einsetzen, denn 


mE ext und Bildmaterial gehen weit über das 


hinaus, was herstellerseitig an Literatur 
angeboten wird. 
416 Seiten, Softcover, DM 56,- 


APPLE II PASCAL - 
Eine praktische Anleitung 
(A. Luehrmann, H. Peckham) 


« Unentbehrlich für alle, die die Programmier- 


E sprache PASCAL lernen wollen und 


“ANLEITUNG 


ARTHUR LUEHRMANN » HERBERT PECKHAM 


Zugang zu einem Apple-Computer haben. 
544 Seiten, Softcover, DM 59,- 


Computer für Kinder 
(Sally Greenwood Larson) 
Ein Buch für Kinder, ihre Lehrer 
und Eltern. 
„Computer für Kinder“ richtet 
sich an Kinder im Alter von 8 bis 
13 Jahren, für deren Interesse an 
Computern dieses Buch bewußt 
geschrieben wurde. 
Unterhaltsam und leicht verständlich. 
A4 quer, Fadenheftung, DM 29,80 


APPLE 


MASCHINEN 
SPRACHE 


DON INMAN - KURT INMAN 


LOGO - 

Jeder kann programmieren 

(Daniel Watt) 

Buch des Jahres in den USA. Für die 
Computer C64, ATARI, APPLE II, IBM-PC 
und TI-99. 

Hochwertiges Textbuch für Logo-Kurse für 
zu Hause und im Lehrbereich. 

A4, DM 59,- 


APPLE II - Bewegte 3D-Graphik 

(Phil Cohen) 

Selbstentworfene Graphiken und Dia- 
gramme — animiert oder als Standbilder — 
eben oder räumlich: alle erforderlichen 
BASIC-Programme mit Erklärung finden 
Sie in diesem Buch. 


ca. 190 Seiten, Softcover, DM 49,- 


Apple Maschinensprache 

Für BASIC-Programmierer der einfachste 
Zugang zur Muttersprache des Apple. Wesent- 
lich schnellere Maschinenprogramme, direkte 
Manipulation des Mikroprozessors 6502 im 
Apple — als Brücke dorthin benötigt dieses 
Buch nur die drei BASIC-Befehle, POKE, 
CALL, PEEK. D. Inman/K. Inman. DM 49, — 


Noch im Programm: 
6502 - Programmieren in Assembler DM 59,- 
VisiCalc, 50 Programme auf Diskette, DM 79,- 


In Vorbereitung: 
Macintosh Programmier-Handbuch DM 59,- 








kopierer Anzeige erstattete. Es kommt zu 
einer Beschlagnahme von „Schwarzko- 
pien“ und anschließend zum Prozeß. Der 
Schwarzkopierer behauptet, das Werk sei 
eine „Folge von mechanischen Chiffren“, 
während der Urheber entgegnet, es han- 
dele sich um ein „Hölderlin-Übersetzung“ 
in einem unknackbaren Code“. Wir würde 
der Richter den Fall beurteilen, wenn er 
das „Geheimwerk“ nicht vorher 
„knackt“? 

Aus dieser Persiflage lernen wir, daß bei 
„Geheimwerken“ niemand zweifelsfrei 
nachprüfen kann, ob sie schutzfähig sind 
oder nicht. Folglich kann auch niemand 
aufgrund des Urheberrechtsgesetzes 
(wohl aber u.U. aufgrund anderer Geset- 
ze) zur Rechenschaft gezogen werden, 
denn sonst würde der Willkür Tür und Tor 
geöffnet. Man stelle sich einmal vor, das 
Urheberrechtsgesetz selbst wäre seiner- 
zeit im Bundesgesetzblatt in chiffrierter 
Form veröffentlicht worden! Wer hätte sich 
dann danach richten können? Man stelle 
sich ferner plastisch vor, alle Bücher und 
Zeitschriften würden in codierter Form er- 
scheinen! Wer würde dann noch von 
schutzwürdigen „Kulturgütern“ spre- 
chen? 

Obgleich das Pflichtabgabegesetz mit dem 
Urheberrechtsgesetz direkt nichts zu tun 
hat, ist es dringend an der Zeit, daß auch 
für „Computerwerke“ eine Pflichtabgabe 
als Quellcode gesetzlich vorgeschrieben 
wird, weil dann jedermann bei der Deut- 
schen Bibliothek oder der jeweiligen Lan- 
desbibliothek in die „Computerwerke“ 
Einsicht nehmen kann, womit allererst ent- 
schieden werden kann, ob ein Werk im 
Sinne des Urheberrechtsgesetzes vor- 
liegt. Denn man merke sich: Nicht jedes 
„Computerwerk“ ist automatisch ein urhe- 
berrechtlich geschütztes Werk. Vielmehr 
besteht bei kopiergeschützten Werken 
stets der Verdacht, daß sie nicht urheber- 
rechtlich geschützt sind. 

Der Grund, warum „Computerwerke“ kei- 
ne „Geheimwerke“ sein dürfen, wird kla- 
rer, wenn man sich die zwei Seiten eines 
„Computerwerks“ näher ansieht. Die äu- 
Bere Seite ist das Computerprogramm als 
Erscheinung und Leistung, und die innere 
Seite ist das Computerprogramm als 
Werk. Urheberrechtlich schutzfähig ist 
normalerweise nur die innere Seite. Ein 
einfaches Beispiel: Auf der kopierge- 
schützten Demo-Diskette „A Guided Tour 
of Macintosh“ der Firma Apple ist ein klei- 
nes Programm, das ein stark vereinfachtes 
Klavier simuliert, auf dem man mit der 
„Maus“ spielen kann. Die Grafik der Ta- 
sten wird man kaum als ein Kunstwerk 


bezeichnen können. Und da das Pro- 
gramm keine Melodie enthält, liegt auch 
kein Musikwerk vor. Was der Anwender 
sieht, also die äußere Seite des Pro- 
gramms, ist damit überhaupt kein Werk, 
wie ja auch ein echtes Klavier kein Werk 
im Sinne des Urheberrechts ist. Wie steht 
es dagegen mit der inneren Seite oder dem 
Programm selbst? Da die „Guided-Tour“- 
Diskette kopiergeschützt ist, kann man 
sich die innere Seite nicht ansehen und 
damit auch nicht entscheiden, ob eine per- 
sönliche geistige Schöpfung vorliegt. Das 
Klavierdemo könnte theoretisch sogar ein 
Plagiat sein, das die Firma Apple bei ir- 
gendeinem anderen Autor „abgekupfert“ 
hat. In diesem Fall wäre dann der Macin- 
tosh-Käufer zugleich Erwerber einer 
Raubkopie. Da die Firma Apple eine Vor- 
liebe für Abmahnungen hat, hätte sie hier 
endlich eine Handhabe, um die gesamte 
eigene Kundschaft abzumahnen... Aber 
Spaß beiseite: Dieses triviale Beispiel 
zeigt bereits auf das deutlichste, daß der 
Käufer eines „Geheimwerkes“ nicht über- 
prüfen kann, ob er ein Plagiat erworben 
hat. 


Bei größeren Programmpaketen fallen ei- 
nem immer wieder ähnliche Leistungen 
auf: Sortierroutinen, Mergeroutinen, Bild- 
schirmroutinen, Rechenroutinen, Druck- 
routinen usw. Wenn man solche „Compu- 
terwerke“ dann „knackt“, stellt man fest, 
daß oft nicht nur die Leistungen dieser 
Programme ähnlich sind. Man nehme das 
Sort-Modul des Autors X, das Merge-Mo- 
dul des Autors Y, den Maskengenerator 
des Autors Z, kleide das ganze in eine 
neue äußere Form und mache dann alles 
so kopiergeschützt, daß man sich Quellen- 
angaben sparen kann — und fertig ist 
das neue Programmpaket. Manch ein 
Richter würde vom Ledersessel fallen, 
wenn er die Quellcodes diverser kopierge- 
schützter Programmpakete detailliert ver- 
gleichen würde. Im Gegensatz zu wissen- 
schaftlichen Werken, die reichlich Zitate 
aus fremden Werken enthalten (was im 
übrigen rechtens ist), findet man bei den 
kommerziellen Computerprogrammen 
praktisch nie Zitate. Dies kann zweierlei 
bedeuten: Entweder sind die Programm- 
autoren so genial, daß sie jedes Programm 
von Grund auf neu schreiben, oder sie 
wiegen sich in der Hoffnung, daß keiner 
merkt, bei wem sie „abgekupfert” haben, 
weil sie ihre Programme nachträglich ko- 
piergeschützt machen. 

Ein Beispiel: Nehmen wir an, Sie kaufen 
das Diskettenkopierprogramm B, das sich 
mit der Bildschirmmeldung „Insert Disks. 
Press any key to continue“ meldet. Neh- 


men wir ferner an, daß Sie bereits ein 
älteres Kopierprogramm A besitzen, das 
sich mit der gleichen Meldung vorstellt 
und im übrigen die gleiche Funktion des 
Diskettenkopierens erfüllt. Da Phrasen in 
der Art „Press any key to continue“ ohne- 
hin keinen Urheberrechtsschutz genießen 
und da die Kopierleistung des Programms 
ebenso wie die Kopierleistung eine Photo- 
kopiergerätes nicht schutzfähig ist, wer- 
den Sie sich fragen, ob Sie nicht einem 
Plagiator zum Opfer gefallen sind. Schutz- 
fähig wären nämlich nur die Kopierpro- 
gramme selbst, genauer gesagt die per- 
sönlich-geistig-schöpferische Art und 
Weise der Implementierung der Program- 
me. Aber davon sehen Sie nichts, wenn 
diese kopiergeschützt sind. 

Wer Banknoten erhält, muß selbst oder 
durch einen geeigneten Experten nach- 
prüfen lassen können, ob die Scheine 
„Blüten“ sind. Ähnlich muß auch der Er- 
werber einer Software selbst oder durch 
einen Experten in Erfahrung bringen kön- 
nen, ob die Software ein Plagiat ist. Dies 
ist jedoch bei kopiergeschützten Werken 
per definitionem nicht möglich. Während 
also Buchautoren ihre Manuskripte, Kom- 
ponisten ihre Noten und Künstler ihre Ge- 
mälde für jedermann nachprüfbar offenba- 
ren, zeigen viele Software-Entwickler nur 
„Geheimwerke“ vor, die mit großer 
Selbstverständlichkeit als Urheberwerke 
ausgegeben werden, obwohl sie es wahr- 
scheinlich oft gar nicht sind. Aufgrund die- 
ser unbefriedigenden Rechtslage ergibt 
sich nur eine sinnvolle Empfehlung: 
Grundsätzlich sollten nur diejenigen 
„Computerwerke“ Urheberrechtsschutz 
genießen, deren Quellcodes veröffentlicht 
oder öffentlich hinterlegt werden. 


2. WAS IST EINE WERKKOPIE? 


Der 8 53 UrhG lautet auszugsweise wie 
folgt: 

Vervielfältigung zum persönlichen Ge- 
brauch: 

(1) Zulässig ist, einzelne Vervielfältigungs- 
stücke eines Werkes zum persönlichen 
Gebrauch herzustellen. 

(2) Der zur Vervielfältigung Befugte darf 
die Vervielfältigungsstücke auch durch ei- 
nen anderen herstellen lassen,... 

(3) Die Vervielfältigungsstücke dürfen we- 
der verbreitet noch zu öffentlichen Wie- 
dergaben benutzt werden. 

(4) ... 

(5) Ist nach der Art eines Werkes zu erwar- 
ten, daß es ... durch Übertragung von ei- 
nem Bild- oder Tonträger auf einen ande- 
ren zum persönlichen Gebrauch vervielfäl- 
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tigt wird, so hat der Urheber des Werkes 
gegen den Hersteller von Geräten, die zur 
Vornahme solcher Vervielfältigungen ge- 
eignet sind, einen Anspruch auf Zahlung 
einer Vergütung für die durch die Veräuße- 
rung der Geräte geschaffene Möglichkeit, 
solche Vervielfältigungen vorzunehmen. 
... Der Anspruch Kann nur durch eine Ver- 
wertungsgesellschaft geltend gemacht 
werden. Als Vergütung steht jedem Be- 
rechtigten ein angemessener Anteil an 
dem vom Hersteller aus der Veräußerung 
der Geräte erzielten Erlös zu; die Summe 
... darf fünf vom Hundert dieses Veräuße- 
rungserlöses nicht übersteigen. 


8 53 UrhG regelt den „persönlichen Ge- 

brauch“ und $ 54 UrhG den „sonstigen 

eigenen Gebrauch“. „Ersterer ist ein be- 

sonders begünstigter Unterfall des letzte- 

ren“ (Hubmann, S. 158). Aus Platzgrün- 

den beschränken wir uns auf den „per- 

sönlichen Gebrauch“. 

Es gibt folgende Arten von „Computer- 

werk-Exemplaren“ (allesamt in der Regel 

in Diskettenform): 

a) Primäroriginal = Quellcode 

b) Sekundäroriginal = Objektcode 

c) Originalwerkstück = von (b) hergestell- 
te Kopie 

d) Primärvervielfältigungsstück = von (c) 
hergestellte Kopie 

e) Sekundärvervielfältigungsstück = 
(d) hergestellte Kopie 

Die Originalwerkstücke zeichnen sich in 

der Regel durch ein entsprechendes EIti- 

kett auf der Diskette aus. Raubkopien re- 

krutieren sich aus Primär- und noch häufi- 

ger aus den Sekundärvervielfältigungs- 

stücken, doch ist — wie wir gleich sehen 

werden — keineswegs jedes Vervielfälti- 

gungsstück automatisch eine Raubkopie. 


von 


2.1. Beispielfälle 


Anstelle akstrakter Definitionen erläutern 
wir das, was nach dem Kopierrecht (un)- 
zulässig ist, anhand von Beispiel(zitat)en: 


1. Originale: Mit Originalwerkstücken 
kann man machen, was man will. Man 
kann sie „an Verwandte und Freunde wei- 
tergeben“ (Hubmann, S. 158). „Nach der 
Erschöpfungstheorie ist es sogar gestat- 
tet, Werkstücke weiterzuverkaufen“ (Hub- 
mann, S. 158). 


2. Einzelexemplare: Es ist „zulässig, ein- 
zeilne Vervielfältigungsstücke eines Wer- 
kes ... zum persönlichen Gebrauch herzu- 
stellen“ (Hubmann, S. 158). Aufgrund des 
sog. Bremer Schulbuchprozesses, bei 
dem es darum ging, daß Bremer Schulen 
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ganze Klassensätze vervielfältigt hatten, 
ist der Begriff „einzelne Stücke“ als maxi- 
mal 7 Exemplare auszulegen (weil eine 
Schulklasse in der Regel mehr als 7 Schü- 
ler umfaßt). Konkret gesprochen heißt 
dies, daß man z.B. „Appleworks“ kaufen 
und im Anschluß daran maximal 7 Kopien 
an maximal 7 Freunde verteilen kann. 


3. Beliebige Dritte: „Persönlicher Ge- 
brauch liegt vor, wenn durch die Vervielfäl- 
tigung lediglich dem Hersteller (gemeint: 
Kopierer) oder dem mit ihm durch ein per- 
sönliches Band verbundenen Bekannten- 
kreis der Werkgenuß vermittelt werden 
soll“ (Hubmann, S. 158). Unzulässig ist es 
also, wenn für beliebige Dritte Kopien her- 
gestellt werden. Wenn mir also mein 
Freund eine Kopie seines als Original- 
werkstück erworbenen „S-C-Macroassem- 
blers“ mitbringt, so ist dies (aus der Sicht 
meines Freundes) zulässig, weil wir durch 
„ein persönliches Band“ verbunden sind. 
Wenn aber ein Apple-Händler einem 
Macintosh-Käufer eine Kopie vom neuen 
„Finder 1.1“ in die Hand drückt, dann ist 
dies (aus der Sicht des Händlers) unzuläs- 
sig, denn ein Gewerbetreibender handelt 
per definitionem nie aus „privater Verbun- 
denheit“. 


4. Kopieranstalt: „Der zur Vervielfälti- 
gung Befugte darf die Vervielfältigung 
auch durch einen anderen, sogar durch 
einen Gewerbebetrieb, herstellen lassen“ 
(Hubmann, S. 159). Man könnte also eine 
„Knackerfirma“ beauftragen, „Prolok“- 
geschützte Originalprogramme zu dupli- 
zieren. 


5. Weiterverbreitung: Gemäß $ 53, Ab- 
satz 3 dürfen Vervielfältigungsstücke nicht 
verbreitet, d.h. entgeltlich oder unentgelt- 
lich weitergegeben werden. Der Verkauf 
oder Tausch von Vervielfältigungsstücken 
durch Anzeigen in Zeitschriften ist dem- 
nach stets verboten, zumal sich eine An- 
zeige an beliebige Dritte wendet, mit de- 
nen man natürlich nicht durch ein „per- 
sönliches Band“ verbunden sein kann. 
„Ebenso ist der Verkauf ... mittels Zei- 
tungsanzeige unzulässig; auch ein 
Tausch unter den gleichen Bedingungen 
würde gegen Absatz 3 verstoßen“ (Norde- 
mann, S. 324). (Der Verkauf oder Tausch 
von Originalwerkstücken ist indes stets er- 
laubt.) Andererseits heißt es bei Norde- 
mann, S. 323: „Ein zur persönlichen Be- 
nutzung hergestelltes Werkstück (ge- 
meint: Vervielfältigungsstück) darf man je- 
doch später veräußern, wenn man es nicht 
mehr braucht“. Das heißt im Extremfall: 


- RECHT 4 


Wenn die (bis zu 7fache) Vervielfältigung 
des „Visicalc“-Originals „von vornherein 
mit der Absicht geschieht, das Vervielfälti- 
gungsstück zu verkaufen“ (Nordemann, 
S. 323), so ist dies unzulässig. Braucht 
man jedoch das Originalwerkstück und die 
bis zu 7 Vervielfältigungsstücke von „Visi- 
calc“ später nicht mehr, so kann man sie 
nunmehr verkaufen. Nimmt man als weite- 
ren Extremfall an, daß man — ähnlich wie 
bei Heiratsanzeigen — „auf diesem Wege“ 
ein „persönliches Band“ mit zunächst 
„unpersönlichen Fremden“ herstellt, de- 
nen man später aus nunmehr „privater 
Verbundenheit“ eines der „Visicalc“-Ver- 
vielfältigungsstücke im Wege des „freund- 
schaftlichen Tausches“ zukommen läßt, 
dann wird klar, daß das urheberrechtliche 
Kopierrecht so viele Löcher wie der 
Schweizer Käse hat. 


2.2. Ein fairer Kompromiß 


In $ 53, Absatz 5 wurde für Musik- und 
Videobänder (einschließlich Kassetten 
und Schallplatten) eine Geräteabgabe ein- 
geführt, weil der Gesetzgeber hier von der 
Erwartung ausging, daß diese Bild- und 
Tonträger üblicherweise zum persönlichen 
Gebrauch vervielfältigt werden. Dies gilt in 
vollem Umfang auch für Software. Deshalb 
würde meines Erachtens die ideale Lö- 
sung des Kopierdilemmas darin bestehen, 
daß man für Diskettenlaufwerke (abstrakt: 
Datenträgervorrichtungen) eine Geräteab- 
gabe und/oder für Leerdisketten (abstrakt: 
Datenträger) eine Diskettenabgabe ein- 
führt. Diese Abgaben sollten — wie bei 
Tonbandgeräten usw. — 5% des Fabrikab- 
gabepreises nicht übersteigen und durch 
eine neue Wahrnehmungsgesellschaft 
(analog zur GEMA) vereinnahmt und dann 
an die Software-Autoren verteilt werden. 
(Ähnliches sollte im übrigen auch für Pho- 
tokopiergeräte gelten). Damit würde dann 
die Vervielfältigung zum persönlichen Ge- 
brauch nicht mehr diskriminiert oder gar — 
wie bei der gegenwärtigen „Verhaftungs- 
welle“ — kriminalisiert werden. Aus Grün- 
den der Rechtsklarheit bei gewerbsmäßi- 
gen Raubkopierern sollte der Verkauf von 
Vervielfältigungsstücken urheberrechtlich 
grundsätzlich unzulässig sein. Und 
schließlich sollten nur Primärvervielfälti- 
gungen (von Originalwerkstücken) zuge- 
lassen werden. 


‘ 
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Künstlerische Grafik für jedermann 


Teil 1: Wie ein Supereditor entsteht 


1. DIE GRUNDLAGEN 


Es hat alles vor etwa 16.000 Jahren ange- 
fangen. Da nagte Flintstone jr. an einem 
vom Vater mitgebrachten Bisonrippchen 
und wollte endlich wissen, wie wohl ein 
ganzer Bison aussehen mag. Flintstone 
sen. versuchte dies zuerst mit viel Grun- 
zen, Herumspringen und Armewedeln zu 
erklären, aber der Gesichtsausdruck des 
Filius war und blieb ziemlich verdattert. 
Plötzlich hatte Flinstone sen. einen gewal- 
tigen Geistesblitz und machte die beste 
Erfindung seit dem Feuer. Er besorgte sich 
Lehm in verschiedenen Farben und malte 
einen Bison in seiner ganzen Pracht an die 
Höhlenwand, der heute noch in Altamira 
zu bewundern ist. 


In jedem steckt ein Dürer 
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1.1. Ohne Input kein Output 


Wie macht man aber Bilder mit dem Com- 
puter? Wie kommt Onkel Dagobert auf die 
Mattscheibe? Auch im Falle der Compu- 
tergrafik gilt das eiserne Gesetz: Ohne 
Input kein Output! 

Computergrafik kann grob in zwei Katego- 
rien eingeteilt werden: Die eine nennt man 
Vektorgrafik. Hierbei handelt es sich 
hauptsächlich darum, eine mehr oder we- 
niger komplexe Informationsdatei zu ver- 
walten. Die zweite Kategorie heißt Raster- 
grafik, und in diesem Fall wird nur ein 
Bitmuster verändert und verwaltet. Diese 
Beitragsserie wird sich nur mit dieser 
zweiten Grafikkategorie befassen. 

Neben dem Grafiktablett, dem klassischen 
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Graf-quattro ... 


Eingabegerät der Computergrafik, kann 
die Videokamera oder ein Digitizer den 
grafischen Input ganzer Bilder besorgen. 
Mühseliger ist der Input mittels Paddle, 
Joystick oder Trackball. Auch kommt hier 
das „Tablett des armen Mannes“, die 
Maus, in Frage. Die alphanumerische Ta- 
statur, unterstützt von geeigneter Softwa- 
re, ist als Input und Verarbeitungswerk- 
zeug ebenfalls nicht zu verachten. 

Der Output auf dem Monitor ist bei der 
Computergrafik selbstverständlich. Hard- 
copies (Printouts, Ausdrucke) können mit 
einem grafikfähigen Drucker hergestellt 
werden, z.B. mit dem hervorragenden 
Programm von Jürgen und Dieter Geiß im 
Peeker Heft 1/84. Glückliche Besitzer ei- 
nes Plotters können mit einem geeigne- 
tem Grafik-Dump-Programm weitaus bes- 
sere Ergebnisse erzielen. Foto, Film und 
Videoband können sich als weitere Me- 
dien anbieten. 

Wenn wir den Input mit einer Kakaobohne 
und den Output mit einer fertigen Tafel 
Schokolade vergleichen, wird sofort klar, 
daß dazwischen eine ganze Menge pas- 
sieren muß. Man braucht sozusagen 
Werkzeuge, um eine Transformation des 
ursprünglichen Werkstoffes in das fertige 
Produkt zu erreichen, und zwar die richti- 
gen! Versuchen Sie einmal, eine Kuckucks- 
uhr mit Vorschlaghammer und Rohrzange 
zu reparieren. Also mußte für unsere 
Zwecke erst einmal ein Raster-Grafik-Edi- 
tor erstellt werden. Sie werden hier viel- 
leicht einwenden, daß bereits E-Z Draw, 
Alphaplot und viele andere Editoren vor- 
handen sind. Stimmt! Ich kenne sie alle, 
und doch habe ich es mit diesen Editoren 
noch nie geschafft, ein künstlerisches Bild 
in die Welt zu setzen. Was mir vorschwebt, 
ist der „Totale Editor“, die komplette Ma- 
nipulation einer Grafikseite. 
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Bild 2: Graf-quattro-Seite und Pilotseite. Was auf der Pilotseite angezeigt ist, wird von 
Graf-quattro automatisch in die Grafikseiten geholt. 


1.2. Programmstruktur 


Bevor ich auf die Vorzüge eines solchen 
Supereditors eingehe, einige Worte zum 
Gesamtkonzept oder zur „Programm- 
struktur“, wie Informatiker sagen würden. 
Zuallererst: Ein solches Programm ist so 
groß, daß der gesamte Speicher des Ap- 
ple nicht reichen würde. Deshalb muß das 
Gesamtprogramm in Module aufgeteilt 
werden. Jedes dieser Module wird bei Be- 
darf von der Diskette geladen und gezielt 
eingesetzt. Um die Daten braucht man 
sich keine Sorgen zu machen, denn bei 
der Rastergrafik sind es eben nur eine 
Menge Bits, die auf einer der Grafikseiten 
gut aufgehoben sind. Jedes Modul ist also 
ein Teilprogramm, das eine bestimmte 
Verarbeitung der Grafik erlaubt. Wenn alle 
notwendigen Module erstellt sind, braucht 
man nur noch ein „Hauptmenü“ zu schrei- 
ben. 


Jedes Modul wird aus einem Applesoft- 
Programm und einer Reihe von Assem- 
blerroutinen, die die eigentliche Arbeit 
schnell und effizient erledigen, bestehen. 
Jede Assemblerroutine wird so gestaltet, 
daß sie eine einzige Aufgabe erfüllt und 
auch einzeln, d.h. unabhängig vom Ge- 
samtprogamm, anwendbar ist. Auf diese 
Weise kann der Leser die Assemblerrouti- 
nen je nach Bedarf in eigene Programme 
einbauen. Ich werde versuchen, in den 
Beiträgen jeden einzelnen Programmteil 
so zu kommentieren, daß auch der As- 
sembler-Anfänger folgen kann. 


1.3. Speicherverteilung 


Bevor man mit einem Progamm beginnt, 
sollte man sich immer einen Überblick 
über den vorhandenen Speicher und des- 
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sen Aufteilung in die benötigten Bereiche 
verschaffen. 

Der verfügbare RAM-Speicher wird in vier 
Bereiche eingeteilt: 

® Der untere Teil von $0800 (2048) bis 
$IFFF (8191) ist für Applesoft reserviert. 
Keines unserer Applesoft-Progamme darf 
also größer als 6042 Bytes werden, ein- 
schließlich der Variablen und Strings. 

® Der mittlere Bereich von $2000 (8192) 
bis $5FFF (24575) ist von den zwei Grafik- 
seiten belegt. Die erste Grafikseite (HGR) 
wird unsere Arbeitsseite sein, die zweite 
Grafikseite (HGR2) benutzen wir als Gra- 
fikhilfsseite, sozusagen als Schmierbogen 
oder Ablegeplatz für Hilfsmittel. 

® Der obere Bereich ab $6000 (24576) 
besteht wiederum aus zwei Teilen. Indem 
unteren Teil werden die jeweils notwendi- 
gen Assemblerroutinen untergebracht. 
Oberhalb des Assemblerbereichs werden 
wir, je nach Bedarf, andere Werkzeuge 
bereithalten, wie z.B. Shape-Tabellen und 
Fonts für die Beschriftung der Grafikseite. 
® Der kleine Bereich von $0300 (768) bis 
$03CF (975) ist wie geschaffen, um Infor- 
mationen sicher aufzubewahren, die von 
einem Modul zum anderen zu übertragen 
sind. Außerdem werden wir hier Variablen 
und Pointer für den Assemblerteil unter- 
bringen. 

® In der Zeropage $0000 (0) bis $OOFF 
(255) sind noch eine ganze Menge Stellen 
frei, die das Betriebssystem überhaupt 
nicht benutzt. Diese werden natürlich auch 
zum Einsatz kommen, um die Assem- 
blerroutinen schneller und kompakter zu 
gestalten. 


2. DIE MODULE 


Kommen wir nun zu den einzelnen Modu- 
len. So wie jede Assemblerroutine auch 
allein einsetzbar ist, ist jedes Modul prak- 
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tisch ein in sich geschlossenes Programm. 
Wer also ein bestimmtes Modul nicht 
braucht, kann es weglassen. 

Die Aufteilung in einzelne Module mit ge- 
nau definierten Aufgaben hat auch den 
Vorteil, daß jeder Anfänger das Ganze 
besser verfolgen kann. 


2.1. Page-Editor 


Das ist im Grunde genommen nichts Neu- 
es. Page-Editoren gibt es inzwischen wie 
Sand am Meer. Ich werde aber versuchen, 
etwas extrem Bequemes mit einer Menge 
zusätzlicher Funktionen zu schaffen. Also 
nicht nur Punkte, Linien, Vierecke, Boxen, 
Kreise, Ellipsen, Bogen usw., sondern 
auch die Möglichkeit, Teile der Grafik zu 
transponieren, zu verdoppeln, Strukturen 
zu wiederholen usw. Der Page-Editor kann 
wie alle anderen Module eingesetzt wer- 
den, um das Vierfache der auf der Apple- 
Grafik verfügbaren Grafikpunkte zu editie- 
ren, und zwar mit dem folgenden Modul. 


2.2. Graf-quattro 


Dieses Modul entstand, weil ich mich ge- 
ärgert habe. Als ich meinen ersten Apple 
Kaufte (beinahe in der Steinzeit), war es 
schon ein kleines Wunder, 280 x 192 
Punkte als Hires-Grafik zur Verfügung zu 
haben. Später kamen die anderen und 
protzten mit ihrer größeren Auflösung. Zu- 
erst war ich neidisch, doch dann habe ich 
mir gesagt: Was die anderen können, kann 
auch mein Apple, wenngleich auf Um- 
wegen. 

Also, wenn man vier Grafikseiten im Qua- 
drat zusammenklebt, verfügt man über ei- 
ne Grafik mit 560 x 384 Punkten. Selbst- 
verständlich kann man solch eine Grafik 
nicht auf einmal im Bildwiederholspeicher 
unterbringen. Ein beliebiger Ausschnitt 
davon geht aber schon. Demgegenüber 
kann mit einem Plotter oder mit einem 
Drucker der ganze Bereich gedumpt wer- 
den. Für den Printerdump sind vielleicht 
die oben zitierten Autoren so nett, eine 
modifizierte Version ihres wirklich sehr gu- 
ten Programms den Peeker-Lesern anzu- 
bieten. Ich stelle mir vor, daß erst die 
Abschnitte eins und zwei (siehe Bild) je- 
weils in die erste und zweite Grafikseite 
geladen und dann parallel gedumpt wer- 
den. danach folgen die Abschnitte drei und 
vier, so daß das komplette, zusammen- 
hängende Bild auf Papier gebracht werden 
kann. Falls eine Language-Card vorhan- 
den ist, könnte man ein gemovtes DOS 
einsetzen und somit Platz genug für alle 
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vier Grafikseiten schafften, und zwar von 
$2000 bis $9FFF. 

Zu den vier Grafikseiten wird eine fünfte 
angelegt, die eine geschrumpfte Version 
aller vier Seiten enthält und als Kontrollsei- 
te dient. Das Graf-quattro-Modul arbeitet 
folgendermaßen: 


Auf der Diskette werden zuerst fünf Gra- 
fikseiten angelegt. Die vier Seiten der ei- 
gentlichen Grafik können ebensowohl leer 
sein oder bereits Teile der Grafik enthal- 
ten. Mit einem Digitizer könnte man sogar 
ein Grundmotiv in der Gesamtauflösung 
als Basis für die Grafik abtasten. Diese 
Seiten bekommen einen beliebigen Datei- 
namen, gefolgt von den Zahlen 1 bis 5. Die 
Aufgabe des Graf-quattro-Moduls ist es, 
mit Hilfe der fünften Seite, die wir Pilotsei- 
te nennen wollen, aus den vier Seiten 
einen beliebig zu plazierenden Ausschnitt 
von 280 x 192 Punkten herauszuholen. 
Danach bringt das Graf-quattro-Modul den 
editierten Ausschnitt in die vier Grafiksei- 
ten zurück. Die Pilotseite wird automatisch 
entsprechend geändert oder ergänzt. Wer 
eine RAM-Karte besitzt und als Pseudo- 
Disk benutzt, kann dies alles sehr schnell 
während des Editiervorgangs erledigen. 





DOS 

38400 $9600 

Shapes 

+ 
Fonts 
? ? 
Maschinensprache 

Patches 
24576 $6000 
16384 $4000 
8192 $2000 
2048 $0800 


975 $03CF 
Variable + Pointer 
768 $0300 
255 $0OFF 
Zero-Page 
0 $0000 


Bild 1: Speicherverteilung bei Graf-quattro 
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2.2.1. Spezialroutinen 


Scrunch: (to scrunch = wörtlich „stau- 
chen”; auch „to crunch“) Die Assem- 
blerroutinen dieses Moduls werden schon 
für das Graf-quattro-Modul eingesetzt. 
Diese Funktion ist als separates Modul 
sehr nützlich, um eine Grafikseite linear 
um die Hälfte zu verkleinern, so daß das 
Ganze oder Teile davon in anderen Grafi- 
ken Verwendung finden können. 


Zoom: (to zoom = wörtlich „auseinander- 
ziehen“) An sich findet dieses Modul we- 
nig Verwendung, da beim Aufblasen von 
einem Teil der Grafik die ganze Struktur 
vergröbert wird, so daß jeder Punkt in ein 
Blöckchen von vier Punkten verwandelt 
wird. In einzelnen Fällen könnte ein ge- 
zoomter Ausschnitt aber von Nutzen sein. 


Retusche mit Lupe: Damit wird eine feine 
und sehr genaue Punktretusche der Gra- 
fikseite ermöglicht. Um die Augen nicht 
übermäßig zu strapazieren, nutzt das Mo- 
dul den Zoomeffekt als bewegliche Lupe. 
Pinsel: Dieses Modul liefert uns eine Rei- 
he von Hires-Pinseln, vom feinen Retu- 
schepinsel bis zur dicken Quaste, und ei- 
nen Radiergummi. Damit kann man die 
Grafikseite frei gestalten oder ergänzen, 
z.B. kann man sie mit Schattierungen oder 
Strukturen versehen. 


Turtle: Dies ist eine Emulation der Turtle- 
grafik, die aber mit einigen zusätzlichen 
Funktionen ausgestattet ist. Man kann 
nicht nur eine Linie bilden und drehen, 
sondern sie auch in jeder Richtung ver- 
schieben. Die Fähigkeiten des Page-Edi- 
tors werden so erheblich erweitert. 


Spiegeln: Die ganze Seite oder ein belie- 
biger Ausschnitt davon kann, egal ob links/ 
rechts oder oben/unten, gespiegelt wer- 
den. Der Editor wird viel variabler, und Tei- 
le der Grafik können für eine Weiterver- 
wendung vorbereitet werden. 


Drehen: Ein beliebiger Ausschnitt der 
Grafikseite bis zu max. 192 x 192 Punkten 
kann jeweils um 90 Grad gedreht werden. 
Dies ergänzt das Spiegelmodul, um z.B. 
Umrandungen oder Ornamentik anzubrin- 
gen. 

Fill: Eine komplizierte Assemblerroutine 
besorgt das punktgenaue Füllen jeder ge- 
schlossenen Fläche, gleichgültig wie sie 
gestaltet ist. 

Kollage: Hier geht es nicht darum, vierek- 
kige Grafikausschnitte übereinander zu 
bringen; das kann schon jeder Macintosh- 
Rechner. Es ist vielmehr das exakte, kon- 
turierte Aufkleben von Grafikteilen auf 
eine darunterstehende Grafik gemeint! 
Peeker macht's eben möglich. 


Shapes: Das Modul wird alle Geheimnis- 
se der Apple-Shapes enthüllen. Für Gra- 
fikanfänger wird dieser Beitrag besonders 
interessant sein, da sie sich erfahrungsge- 
mäß mit den Apple-Shapes immer schwer 
tun. 


2.3. Editor mit Shapes 
Dies ist der normale Shape-Editor. 


2.4. Editor mit Autoshapes 


Dieses Modul wird eine große Überra- 
schung werden. Einfach einen beliebigen 
Ausschnitt auf einer Grafikseite definieren, 
und der Inhalt wird automatisch in ein 
Shape verwandelt, das dann nicht nur ge- 
dreht, sondern auch links/rechts und 
oben/unten gespiegelt werden kann. Und 
es kommt noch mehr: Die normalen Apple- 
Shapes brauchen drei Bits, um einen Vek- 
tor zu definieren. Das macht die Sache 
umständlich und erlaubt normalerweise 
nur, zwei Vektoren in einem Byte unterzu- 
bringen. (Die restlichen zwei Bits sind sel- 
ten zu gebrauchen, es sei denn, sie be- 
inhalten einen Vektor mit „Move to“.) Das 
Auto-Shape-System, das ich vorhabe, be- 
nötigt nur zwei Bits pro Vektor, so daß 
immer vier Vektoren in einem Byte Platz 
finden. Wer das nicht glaubt, soll es abwar- 
ten. Das System wird außerdem erheblich 
schnellere Shapes als das Applesoft- 
Shape-System bieten. 


2.5. Font-Editor 


Mit diesem Modul kann jeder seine eige- 
nen Schriften entwerfen. Es handelt sich 
hier nicht um einen Abklatsch von 
HIGHER TEXT, wo jeder Buchstabe genau 
dasselbe Blöckchen belegt. Bei diesen 
Fonts werden die Buchstaben eine belie- 
bige Größe bekommen, und jeder Buch- 
stabe wird in der Breite genau seinen zu- 
gewiesenen Platz belegen. Das nennt man 
variable Schrittbreite (oder drucktechnisch 
„Dickte“, Anm. d. Red.), d.h. das „I“ ist 
schmaler als das „M“. 





Bild 3: „Fipsi“ 
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DE Endlich anspruchsvolle Computer- E 
Mikrocomputer grafik für BASIC-Programmierer! 

Grafik Mikrocomputer Grafik: 

- enthaöält fast 80 lauffertige 
BASIC-Programme, die die be- 
schriebenen Grafikkonzepte 
illustrieren. 

- beschreibt "Hidden Line”- und 2 


Roy E. Myers 





"Hidden Surface"-Methoden, = 
Skalierung, Rotstion und Trans- n 
lation von Grafiken. 
- bietet eine Einführung in die ss 
Animationstechnik. er 


3-89058-000-9 2925. DM 49,-- 
komplett mit Disk DM 89,-- | . 





Die Qualität kommerzieller Arcade- 
spiele Jäßt sich mit APPLESOFT BA- 

SIC alleine nicht erreichen. Jeffrey Apple j e 
Stanton führt in die Eigenarten der || Raster Grafik 
| hochauflösenden Apple-Grafik ein 

4 und präsentiert schließlich eine 
Reihe extrem schneller Assembler- 
4 Routinen, mit denen Sie viele Effek- 
te bekannter Spiele selbst program- 
mieren können. Gute BASIC-Kennt- 
nisse werden vorausgesetzt, eine 
Einführung in Assembler-Program- 
mierung wird gegeben. 
3-89058-006-8 2995. DM 49,-- 
komplett mit Disk DM 89; -- 


Jeffrey Stanton 





22 Pascal-Programme, mit denen 
Sie die Grafik-Möglichkeitern Ihres 
Apple voll ausschöpfen: 3 
"DESIGNER" ermöglicht es Ihnen, ei- | 
gene Zeicherisätze zu erıtwerfen, Ka 
"GREDIT" unterstützt Sie beim Ent- eo 
werfen kompletter Bildschirm- Sn ; 
Grafiken; 

"PRINTFOTO" bringt Ihre Entwürfe 
aufs Papier. Darüberhinaus bietet 
das Buch eirıe Fülle fertiger Proze- I 
duren, die Sie zeitsparend in Ihre oe 
eigenen Programme einbauen können 2 
3-89058-009-2 2805. DM49,-- I 
komplett mit Disk DM 89, -- 


Pascal Grafik 


Tom Swan 
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2.6. Text-Editor 


Unter Verwendung der zu diesem Zweck 
geschaffenen Fonts kann man die Grafik- 
seite horizontal oder vertikal beschriften. 
Das istin groben Zügen das, was die Graf- 
quattro-Serie bieten wird. 


3. DIE XPLOT-ROUTINE 


Und nun, um den Beitrag nicht so trocken 
ausgehen zu lassen, hier der erste Patch. 
Applesoft kann zwar den HPLOT-Befehl in 
verschiedenen mehr oder weniger 
brauchbaren Farben ausführen. Das Wich- 
tigste wurde aber außer acht gelassen: der 
„Exklusiv-oder“-Modus. An sich wäre es 
eine Kleinigkeit gewesen, ein HCOLOR = 
8 einzufügen. Platz genug war vorhanden, 
auch ohne andere Routinen zu beschnei- 
den, wie z.B. die HFIND ($F5CB), die von 
Applesoft sowieso nicht benutzt wird. Es 
hätte genügt, die zwei Patches für DRAW 
und XDRAW vernünftiger zu gestalten, 
womit man Platz für XPLOT sowie ein paar 
andere Kleinigkeiten geschaffen hätte. 
Aber ROM ist eben ROM, und uns bleibt 
nichts anderes übrig, als das Fehlende 
hinzuzufügen. Eine XOR-Linie braucht 
keine Farbbestimmung, weil sie immer 
zum vorhandenen Hintergrund negativ 
dargestellt wird. Es gibt selbstverständlich 
mehrere Möglichkeiten, dies zu bewerk- 
stelligen, auch effizienter als im Applesoft- 
Interpreter. Ich habe mich aber für eine 
modifizierte Applesoft-Routine entschie- 
den, da sie kürzer ist und in bekannter Art 
und Weise arbeitet. 


Die Routine - XPLOT.ROUTINE genannt 
— ist 181 Bytes lang, belegt den Speicher- 


XPLOT.DEMO 


1® REM XPLOT.DEMO 


platz unmittelbar nach der zweiten Grafik- 
seite, also von $6000 (24576) bis ein- 
schließlich $60B4 (24756), und kann fol- 
gendermaßen angesprochen werden: 
Vom Applesoft aus zuerst CALL 24576 
und danach HPLOT-Befehle wie üblich bis 
zum Ende der Programmzeile oder zum 
nächsten Doppelpunkt. Der CALL fängt 
sozusagen die darauffolgenden -HPLOT- 
oder HPLOT-TO-Befehle ab und verarbei- 
tet sie selber. Damit kann man in Applesoft 
wie gewohnt programmieren. Ich könnte 
auch den Ampersand (&) strapazieren, ha- 
be dies aber bewußt nicht getan, da es 
eben nur ein kurzer Patch ist. Sind genug 
Patches für ein erstes Modul zusammen, 
kann man immer noch eine Tabelle mit 
sämtlichen &-Applesoft-Befehlen basteln. 
Das kleine Applesoft-Testprogramm - 
XPLOT.DEMO genannt - illustriert, wie es 
gemacht wird. Nur einige Worte zur letzten 
Applesoft-Zeile. Wer es nicht bereits weiß: 
Dies ist ein Trick, um die Grafikseite mit 
einer bestimmten Farbe zu füllen. In Spei- 
cherstelle 28 wird die sogenannte Color- 
Mask gepokt, und der CALL füllt die Seite 
mit der gepokten Farbe. 127 bedeutet hier 
weiß = 1. Im einzelnen gilt: 

schwarz 1 =0 

grün = 42 

purpurrot = 85 

weiß 1 = 127 

orange = 170 

blau = 213 

weiß 2 = 255 

Selbstverständliich können auch andere 
Werte gepokt werden, die dann aber ver- 
schiedene Streifenmuster erzeugen. 


Für angehende Assembler-Freaks eine 
Aufklärung: Grafikpunkte und Linien funk- 


28 HIMEM: 8192:XP = 24576: HGR : 
POKE - 16302,0:C = ß:A=-]L| 
38 PRINT CHR$ (4);"BLOAD XPLOT.ROUTINE"" 
40 X1l = 138:X2 = 140:X3 = X2:X4 = Xl: 
Yl = 94:Y2 = Y1:Y3 = 96:Y4 = Y3 


5SBA=A+H |]: 


IF A= 2 THEN A = ®: GOSUB 9® 


60 FOR I = 1 TO 45: GOSUB 79:X1 = X1 - 2: 
X2 = X2 + 2:X3 = X3 + 2:X4 = X4 - 2: 
Yl=Yl - 2:Y2 =Y2 -— 2:Y3 = Y3 + 2: 


Y4 = Y4 + 2: NEXT : 


GOTO 49 


CALL XP: HPLOT X1,Y1 TO X2,Y2 TO X3,Y3 
TO X4,Y4 TO X1,Yl: RETURN 


REM Das ist ein Trick! 


C=ß+ 127 x (C =): POKE 28,C: 


CALL 62454: RETURN 
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tionieren unter Verwendung aller drei A-, 
X- und Y-Register mit Hilfe einer Routine 
namens HPOSN, die die Aufgabe hat, ei- 
nen unsichtbaren Cursor auf der Grafiksei- 
te zu positionieren. Außerdem wird der 
zuletzt geplottete Punkt zwischengespei- 
chert, so daß anschließende Linien mit 
„10“ gerufen werden können. Die drei 
Register reichen aus, da der X-Koordina- 
tenwert zwar mehr als acht Bits braucht, 
für den Y-Koordinatenwert 8 Bits aber völ- 
lig genügen (max. 191). Merkwürdigerwei- 
se gitt für die Cursorpositionierung 
(HPOSN) und das evtl. folgende HPLOT 
folgende Registerbelegung: 

(1) 

Im A-Reg. der Y-Wert 

Im X-Reg. der X-Low-Wert 

Im Y-Reg. der X-High-Wert 

Nach der Positionierung des Cursors oder 
nach einem ersten HPLOT für eine darauf 
folgende Linie ist statt dessen folgende 
Belegung vonnöten: 

(2) 

Im A-Reg. der X-Low-Wert 

Im X-Reg. der X-High-Wert 

Im Y-Reg. der Y-Wert 

Für den Assemblerprogrammierer bietet 
die XPLOT-Routine drei Entry-Points, die 
im Source-Listing mit EP1, EP2 und EP3 
markiert sind. 

EP1 = $601D ist XPOINT, und die Regi- 
sterbelegung ist die übliche wie bei (1). 
EP2 = $6039 ist XLINE mit derselben 
Registerbelegung wie XPOINT. Die dar- 
auffolgenden Zeilen besorgen den nötigen 
„Swap“. 

EP3 = $603F ist XLINE mit der üblichen 
Applesoft-Registerbelegung, wie unter 
ke: 


Das war es vorläufig. 





Bild 4: „Die zarteste Versuchung...“ 
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grafik 44 


XPLOT.ROUTINE 


ORG $6PH0P 6944: 
6045: $El 
XPLOT.ROUTINE 6047: $D3 
——— 6949: XLIN2 
604AB: 
von N.G.Barbieri, 1985 6BAC: #$FF 
6B4AE: #$1 
Eine modifizierte Version der 6059: 
Applesoft-HPLOT-Routine, um 6051: +$9 
XPLOT zu ermöglichen. 6053: $D3 
* 6055: $D1 
COLON EQU $3A A 6057: $D5 
HPLOT EQU $93 6959: 
TO EQU $c1 6O5A: $D9 
CHRGOT EQU $B7 6O5C: $D4 
SYNCHR EQU $DEC® 6P5E: 
HFNS EQU $F6B9 605F: $E® 
HPOSN EQU $FAll 661: $El 
LFTRT EQU $F465 6063: 
UPDOWN EQU $F4D3 6964: 
* 6065: $E2 
* 6067: XLIN3 
LDA #<COLON 6069: #$FF 
JSR SYNCHR ‚Syntax 6Q6B: #+$FE 
LDA #<HPLOT ‚Check 6PED: $D2 
JSR SYNCHR 6B6F: $E2 
6971: $D3 
JSR CHRGOT 6073: 
CMP _ #TO 6074: $D9 
BEQ DOLINE 6076: 
JSR HFNS 6077: #$FF 
PHA 6079: $D1 
JSR CHRGOT 6OTB: $1D 
CMP #<TO 607D: $E5 
BEQ XLINEL 6ÖTF: MOVEX2 
PLA 6981: 
6082: LFTRT 
XPOINT — Reg.-Belegung: 6085: 
686: MOVEX2 $D4 
A-Reg. = Y-Wert 6088: $D2 
X-Reg. XL-Wert 6D8A: $D4 
Y-Reg. XH-Wert 6BSC: $D5 
6B8E: #+$9 
JSR HPOSN ;EPl 6B9P: HCOUNT $D5 
LDA $3® * 
AND +#$7F ‚jetzt 6092: $39 ‚Sim 
JMP $F46ß® ;XPOINT 6094: #$7F ;‚Salabim 
* 6096: ($26) ,Y 
XLINEl PLA ;XPLOT 6098: ($26) ,Y 
JSR HPOSN ‚Beginn 
* 6A: 
XLINE2 JSR CHRGOT ;XPLOT TO 69B: XLIN4 
CMP +#TO 6P9D: $1D 
BEQ DOLINE \ 6B9F: XLINE2 
RTS 6BAl: $D3 
6PAZ: MOVEX 
JSR SYNCHR 6045: UPDOWN 
JSR HFNS 6PBAB: 
6PA9: $D4 
XLINE 1 - Reg.-Belegung: 6QAB: $D® 
6PAD: $D4 
A-Reg. = Y-Wert 6PAF: $D5 
X-Reg. = XL-Wert 6OB1l: $D1 
Y-Reg. XH-Wert 6PB3: 59 HCOUNT 


181 Bytes 


oo oıovoaAhuı Dr 
«IK KKKKKK 


“KK KKKr KH 


STY $9D ;EP2 

TAY 

TXA ‚Reg. 
LDX $9D ‚Swap 


XLINE 2 — Reg.-Belegung: 


A-Reg. = XL-Nert 
X-Reg. XH-Wert 
Y-Reg. = Y-Wert 


PHA 
SEC 
SBC 
PHA 
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Pr 


BD 


Mn, - 


von Dr. H. Kersten 


für den Apple Il 


Der beschriebene Generator soll dem 
Benutzer die langweilige und zum Teil 
nervende Arbeit der Herstellung von 
Textseiten („Menüs“) auf dem Bild- 
schirm abnehmen: Der Benutzer 
schreibt sein Menü „life“ auf den Bild- 
schirm, der Generator erzeugt aus dem 
vorgegebenen Bild ein Basic-Pro- 
gramm, das beim Ablauf gerade dieses 
Menü liefert. Textpassagen können als 
INVERSE, NORMAL oder FLASH ge- 
kennzeichnet werden, GET- und IN- 
PUT-Befehle werden nach Benutzer- 
wunsch ebenfalls eingebaut, eine Bild- 
schirm-Einrahmung ist leicht realisier- 
bar. Die erzeugten Basic-Zeilen werden 
möglichst kurz gehalten. Zugrunde 
liegt das Betriebssystem DOS 3.3 und 
40-Zeichen/Zeile-Darstellung. 
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Viele Programme neueren Datums sind 
menü-gesteuert, d.h. sie liefern dem Be- 
nutzer nach dem Start eine Übersicht über 
die verschiedenen Wahlmöglichkeiten 
(options) und bieten im allgemeinen hier- 
für Ersatzwerte (default values) an. Der 
Benutzer kann, sofern nötig, einzelne 
Werte ändern. Verlangt ein Programm um- 
fangreiche Eingaben, so sind oft mehrere 
Menü-Seiten erforderlich. 

Für das Herstellen solcher Menüs ist es 
deshalb notwendig, die erläuternden Texte 
in sinnvoller Reihenfolge und gut struktu- 
riert auf dem Bildschirm erscheinen zu 
lassen und anschließend die Benutzer- 
wünsche abzufragen. Die Programmie- 
rung solcher Menüs ist zwar nicht schwie- 
rig, oft aber eine zeitraubende und auf- 
wendige Routine-Arbeit. 

Eine effiziente Lösung dieser Problemstel- 
lung ist die Benutzung eines Generator- 
Programms: Man schreibt per Tastatur das 
Menü-Bild (alle Texte und sonstigen Zei- 
chen) auf den Schirm, hebt dort, wo es 
notwendig erscheint, Zeichenketten z.B. 
mit INVERSE hervor und markiert die Posi- 
tionen für spätere GET- und INPUT-Be- 
fehle. Aus diesen und einigen anderen 
Informationen erzeugt der Generator ein 
entsprechendes Basic-Programm. 
Vorteile dieser Methode: Man sieht sein 
Menü „life“, Korrekturen jeder Art sind 
leicht möglich, jegliches Abzählen von 
Zeilen oder Spalten entfällt, das erzeugte 
Programm läuft auf Anhieb fehlerfrei und 
läßt sich problemlos in ein bestehendes 
Programm integrieren. Sogar aufwendige 
Menüs erfordern wenig Zeit. 


Man kann den Generator auch zur Erzeu- 
gung einfacher (aber umfangreicher) Text- 
ausgaben und für „Text-Grafik“ (‚Bilder‘ 
mit normalen Druckzeichen) verwenden. 


Arbeiten mit dem Generator-Programm 


Nach dem Starten des Programms ME- 
NUE.GENERATOR werden zunächst fol- 
gende Parameter abgefragt: 

1. Menü-Größe in Zeilen * Spalten (Er- 
satzwerte und Maximalwerte 24 x 40) 

2. Zeilennummer der ersten zu erzeugen- 
den Basic-Zeile (Ersatzwert 100) 

3. Zeileninkrement (Ersatzwert 10) 

4. Name, Slot und Drive eines Textfiles, 
auf dem das erzeugte Basic-Programm 
abgelegt wird (Ersatzwerte: MENUE/S6/ 
D1). 

Will man alle Ersatzwerte übernehmen, so 
gibt man auf die Frage nach Änderungen 
N(ein) ein. Im anderen Fall trägt man die 
gewünschten Daten ein; einzelne Ersatz- 
werte übernimmt man durch Eingabe von 
„RETURN“. Soweit wie möglich werden 
die Eingaben auf formale Korrektheit über- 
prüft. 

Nachdem für alle Optionen Werte festlie- 
gen, wird der Bildschirm frei, der Cursor 
erscheint oben links, der Editier-Vorgang 
kann beginnen: Man gibt nun alle Texte 
und Zeichen ein, die das Menü ausma- 
chen - jeweils an der richtigen Schirmpo- 
sition. Hierbei kann man folgende Kontroll- 
funktionen/-tasten benutzen: 


Cursor-Positionierung: ESC mit |, J, K, 
M wie beim Apple-Monitor, CtrI-H Cursor 
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links, Ctrl-U Cursor rechts. Überfahrene 
Zeichen bleiben stets erhalten. Return 
geht zum Anfang der nächsten Zeile, ohne 
die Zeichen rechts vom Cursor zu Iö- 
schen. Es findet kein Scrolling statt: Der 
Cursor springt vom Schirmende zum 
Schirmanfang. 

Darstellungsart: Nach Ctri-| werden wei- 
tere Eingaben als INVERSE markiert, nach 
Ctri-F als FLASH, nach Ctrl-N wieder als 
NORMAL. Das jeweilige „Ergebnis“ sieht 
man unmittelbar. 

Spaltentransfer: Nach Ctrl-T wird in der 
Zeile des Cursors das Zeichen der 1. 
Spalte in die letzte Spalte übernommen. 
Durch Festhalten von Ctrl-T läßt sich somit 
die komplette 1. Spalte übertragen. Die 
Darstellungsart wird dabei berücksichtigt. 
Eingabe-Befehl: Ctri-G markiert die Posi- 
tion für einen GET-Befehl, Ctrl-P für einen 
INPUT-Befehl. (Als Markierungszeichen 
werden [ und ] bzw. Ä und U ausgege- 
ben.) Diese Befehle werden später in der 
zeitlichen Reihenfolge durchlaufen, in der 
sie eingegeben wurden. Die GET-Befehle 
werden mit Variablen CO$, C1$, ..., die 
INPUT-Befehle mit VO$, V1$, ...,program- 
miert“. Die Interpretation dieser String- 
Variablen (vom Benutzer zu programmie- 
ren) sollte im Zielprogramm unmittelbar 
hinter dem Eingabe-Befehl erfolgen. Maxi- 
mal sind 256 Eingabe-Anweisungen mög- 
lich. 

Korrekturen werden durch Überschrei- 
ben ausgeführt; gelöscht wird also mit 
Leerzeichen. Ctrl-W löscht den gesamten 
Schirm und alle Markierungen. 


Der Generiervorgang wird durch Ctrl-S 
gestartet (Cursor-Position ist belanglos!). 
Mit Ctrl-W plus Ctrl-S kann man jederzeit 
aus dem Programm aussteigen, ohne daß 
das Disk-Laufwerk angesprochen wird. 


Am Ende der Verarbeitung erhält man In- 
formationen über die „verbrauchten“ Zei- 
lennummern; hier kann ohne erneutes 
Editieren eine Generierung mit veränder- 
ten Parametern abgerufen werden. Das ist 
auch für folgenden Fall wichtig: Die Zeilen- 
nummern dürfen beim Applesoft-Interpre- 
ter den Wert 63999 nicht überschreiten. 
Letzteres wird vom Menü-Generator im 
Einzelfall überprüft und ggf. angezeigt. 
Soll das erzeugte Menü-Programm in ein 
schon vorhandenes Programm eingebaut 
werden, so ist dies mit LOAD... zu laden 
und danach dann mit EXEC... das Menü- 
Programm einzulesen. Das Gesamtpro- 
gramm wird dann mit SAVE... gespeichert. 
(Unter Umständen kann in den einzelnen 
Phasen ein RENUMBER-Programm nütz- 
lich sein.) 
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Zur Funktion des Generators 


Im Programm-Listing sind die einzelnen 
Funktionsblöcke durch REM-Zeilen über- 
schrieben. 

In der Editierphase wird je nach Kontroll- 
zeichen der Cursor bewegt oder die jewei- 
lige Funktion (z.B. Spaltentransfer) ausge- 
führt. Liegt kein Kontrollzeichen vor, so 
wird das eingegebene Zeichen in eine 24 
* 40 Matrix (SC$) eingetragen, der zuge- 
hörige Darstellungstyp in der Matrix DM 
(0 für NORMAL, 1 für INVERSE, 2 für 
FLASH) vermerkt. 

Alle benutzten Zeilen werden in ZM mar- 
Kiert, die höchste Zeilennummer in ML 
vorgemerkt. Durch diese Maßnahmen wird 
die Generierung zum Teil erheblich be- 
schleunigt. 

Die Programmierung von „GET“ und „IN- 
PUT“ geschieht durch Eintragen dieser 
Funktionen in die Tabelle IM (Typ1 = GET 
/2 = INPUT, Zeile, Spalte). 

Ein Detail-Problem bedarf noch der Er- 
wähnung: Wird in die rechte untere Bild- 
schirmecke ein Zeichen über PRINT aus- 
gegeben, so schiebt der Apple-Monitor 
den Bildschirm-Inhalt um eine Zeile nach 
oben (Scrolling), was hier stets uner- 
wünscht ist. Es läßt sich dadurch vermei- 
den, daß beim Editieren wie auch beim 
erzeugten Basic-Programm statt PRINT 
ein POKE 2039,... verwendet wird. Hier- 
durch wird das Zeichen für diese spezielle 
Schirmposition direkt in den Bildschirm- 
Puffer geschrieben. 

Nach Ende der Editierphase werden nun 
die Bildschirm-Matrix SC$ und parallel da- 
zu die Darstellungsmatrix DM Zeichen für 
Zeichen abgetastet und in PRINT-Befehle 
umgesetzt — unterbrochen durch Anwei- 
sungen wie VTAB, HTAB, NORMAL, 
FLASH und INVERSE. Ein besonderes 
Kapitel ist dabei die Darstellung von Leer- 
zeichen, die ja im Menü-Bild im allgemei- 
nen in großer Zahl auftreten. Sie werden 
vom Generator am Zeilenanfang mit 
HTAB, in der Zeilenmitte als String oder 
über die TAB-Funktion realisiert. Die Opti- 
mierungsroutine (Zeile 6000-7000) findet 
stets die kürzeste Möglichkeit. 
Schließlich: Treten Anführungszeichen (“) 
im Menü auf, so werden sie in „CHR$ 
(34)“ umgesetzt. Den Abschluß der Ge- 
nerierung bildet die „Programmierung“ 
der Eingabe-Befehle. 


Testbeispiel 


Bevor man mit einem Test beginnt, sollte 
in jedem Fall eine Programmsicherung 
stattfinden. Zur direkten Überwachung des 
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Generator-Outputs kann man vor dem 
RUN-Kommando noch MON O eingeben. 
Nach dem Start antwortet man auf die 
erste Frage (nach Änderung der Ersatz- 
werte) mit N (= Nein). Danach gibt man 
etwa ab 1. Zeile folgendes Testbeispiel ein 
(Funktionen sind in <...> angegeben, 
<Ctrl-I> z.B. bedeutet dabei gleichzeiti- 
ges Betätigen der Ctrl- und der I-Taste). 


<return> 

<return> 

NORMAL<return> 
<Ctrl-I>INVERSE<return> 
<Ctrl-F>FLASH<return> 

<return> 

<return> 

<Ctri-N>TEST FÜR GET....:<Ctrl-G> 
<return> 

<return> 

TEST FÜR INPUT..:<Ctrl-P><return> 
<return> 

* IRANSFER-TEST <Ctrl-T><Ctri-S> 


Der Generator-Output sollte dann die fol- 
gende Form haben: 


100 TEXT : HOME 

110 VTAB 3: HTAB 1: REM #x3x* 
120 NORMAL : PRINT "NORMAL; 
130 VTAB 4: HTAB 1: REM #x4xx* 
140 INVERSE : PRINT “INVERSE“; 
150 VTAB 5: HTAB 1: REM #x5x** 
160 FLASH : PRINT “FLASH“; 

170 VTAB 8: HTAB 1: REM x#*8x*x* 


180 NORMAL PRINT “TEST FÜR 
BEL.“ 

190 VTAB 10: HTAB 1: REM #*10xx 

200 NORMAL PRINT “TEST FÜR 
INPUT..:“; 


210 VTAB 12: HTAB 1: REM xx12xx 

220 NORMAL : PRINT “x TRANSFER- 
TEST“; TAB( 40);" x“; 

230 VTAB 8: HTAB 19: GET C0$: PRINT 
C0$; 

240 VTAB 10: HTAB 19: INPUT VO$ 


Zur Kontrolle des Disk-Files gibt man der 
Reihe nach folgende Anweisungen ein: 
NEW —- EXEC MENUE - LIST. Kontrolle 
des Menü-Bildes: RUN. Ein erster größe- 
rer Test könnte darin bestehen, das Start- 
Menü des Generators selbst „nachzu- 
bauen“. 

Für sehr detaillierte und umfangreiche Me- 
nüs kann die Generierzeit im Bereich von 
60 Sekunden liegen. Besitzt man einen 
Basic-Compiler, so kann diese Zeit erheb- 
lich (auf unter 20 Sekunden) reduziert 
werden. 

Bei so vielen Menüs bleibt nur noch „Gu- 
ten Appetit“ zu wünschen. 
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MENUE.GENERATOR 


1000 REM ---Startwerte/Parameter———- 

101® DIM CB$(19),ZM(24) ,SC$(24,49) ,DM(24,49) ,IM(255,3) 

1020 DATA 27,73,74,75,77,8,21,13,28,9,14,19,7,16,91, 
93,34,6,23 

1838 FOR I = 1 TO 19: READ X:CB$(I) = CHR$ (X): NEXT 

104® NL = 24:NC = 49:SL = 109:IN = 19:FI$ = "MENUE": 
ST = 6:DR = 1:R$ = CB$(8) 

1050 OF(ß) = 128:0F(1) = - 64:0F(2) = 

1B60 TX$(®) = " NORMAL ":TX$(1) = " INVERSE ": 
TX$(2) = " FLASH " 

1070 GOSUB 7999 

2000 REM -—-Editierung des Menü-Bildes——- 

2010 TEXT : HOME :LC = 1:CC = 1:ML = ®:DA = GB:EM = $: 
NORMAL 

2028 GET C$ 

2030 IF EM = 1 THEN 2119 

2040 IF C$ = CB$(1) THEN EM = 1: GOTO 2929 

2050 IF ASC (C$) > = 32 THEN 2209 

2068 FOR I = 6 TO 19 

2078 IF C$ > < CB$(I) THEN 2099 

2080 ON I - 5 GOTO 2419, 2429, 2440 ‚2500 ‚2600 ,2610,3019, 
2700,2719,2200 ,2200, 2200 ,2629, 2909 

2090 NEXT I 

210@ PRINT CHR$ (7);: GOTO 2929 

2118 FOR I =1T05 

2128 IF C$ > < CB$(I) THEN 2149 

2138 ON I GOTO 2929,2400 ,241P, 2420 ,2439 

2140 NEXT I 

2150 EM = ®: GOTO 2929 

2208 SC$(LC,CC) = C$: IF (C$ > < " " OR DA > < ß) AND 
c$ > < "" THEN ZMILC) = 1 

2210 IF ML < LC THEN ML = LC 

2228 DMILC,CC) = DA 

2230 IF LC = 24 AND CC = 49 AND C$ > < "" THEN GOSUB 

22408 PRINT C$;:CC = CC + 

2250 IF CC < = ® THEN LC 

2268 IF CC > NE HN LE = LE + 1:00 = 1 

2278 IF LC <= ®Ö THEN LC = NL 

> 


4 
9309: POKE 2939,AS:CC = CC + 1: GOTO 2259 
1 


LC - 1:CC = NC 


2280 IF LC > NL THEN LC = 1 

2298 IF TM = 1 THEN CC = CC + 1:TM= 

2300 HTAB CC: VTAB LC: GOTO 2929 

2400 LC = - 1: GOTO 2259 

2410 CC - 1: GOTO 2258 

2420 CC + 1: GOTO 225® 

2430 LC + 1: GOTO 225® 

2440 LC = + 1:CC = 1: GOTO 2259 

2508 C$ = SC$(LC,1):DA = DM(LC,1): HTAB NC:CC = NC:TM 

2519 GOSUB 2899: GOTO 2290 

2600 DA = 1: GOTO 2639 

2610 DA = ®: GOTO 2639 

2620 DA = 2 

2630 GOSUB 2809: GOTO 2929 

2700 GOSUB 2739:IM(IC,®) = 1:C$ = CB$(15): GOTO 2720 

2710 GOSUB 2739: IM(IC,®) = 2:C$ = CB$(16) 

2728 IM(IC,1) = LC:IM(IC,2) = CC:IC = IC + 1: GOTO 224 

27308 IF IC < 256 THEN RETURN 

2748 PRINT CHR$ (7);:C$ = " ": POP : GOTO 2249 

2800 IF DA = ® THEN NORMAL : RETURN 

281® IF DA = 1 THEN INVERSE : RETURN 

2820 FLASH : RETURN 

2900 HOME : VTAB 12: HTAB 14: NORMAL : PRINT 
"CLEARING..." 

291® FOR I = 1 TO ML:ZM(I) = ® 

2928 FOR J = 1 TO 49:SC$(I,J) = "":DM(I,J) = ®: NEXT J: 
NEXT I:IC = ®: GOTO 2919 

3000 REM -—-Generierung der Basic Zeilen--- 

301® TEXT : HOME : IF ML = ® AND IC = ® THEN END 

3020 VTAB 14: HTAB 8: FLASH : 
PRINT "BITTE WARTEN ";:12(ß) = B:IZ(1l) = 

3030 NORMAL : VTAB 18: HTAB 8: 
PRINT "ZEILE ®® WIRD BEARBEITET" 

3040 NORMAL : GOSUB 95ß0:PK = B:DA = - 1:LN = SL 

3050 PRINT R$;LN;" TEXT:HOME";:LN = LN + IN 

3055 IF ML = ® THEN 4519 

306® FOR I = 1 TO ML:: IF ZM(I) = ® THEN 3239 

3070 Zi = INT (I / 10):22 = I - Z1 * 19: POKE 1245,176 + 
Zl: POKE 1246,176 + Z2 

3080 GOSUB 5@1®: IF N2 < Nl THEN 323® 

3090 IF I = 24 AND N2 = 40 THEN N2 = 39:PK = 1: 
IF Nl = 49 THEN 3239 

31@0® PRINT R$;LN; "VTAB";I;":HTAB" NL; "REM" SI; at: 
LN=LN+ IN 

3118 PC = ®:PM = 9:BC = ß:QC = Ö 

3128 FOR J = Nl TO N2 


DA > < DM(I,J) THEN GOSUB 61ß9:PM = ®:0C = : 
DM(I,J): PRINT R$;LN;TX$(DA);:LN = LN + IN 
SC$(I,J) 

PM = ® THEN PRINT ": PRINT ";:PM = 1 

c$ = " " OR C$ = "" THEN BC = BC + 1: GOTO 3200 

c$ = CB$(17) THEN GOSUB 61ß®: GOTO 641ß 

ON PC + 1 GOSUB 6209, 6399 

PRINT C$;:PC = 1 

NEXT J 

DL = DA:DA = -] 

GOSUB 6199 

NEXT I 

REM -—--Zeile 24, Spalte 49-—— 

IF PK = ® THEN 4049 

DA = DM(24,49):C$ = SC$(24,49): GOSUB 930 

PRINT R$;LN;" POKE 2939,";AS;:LN = LN + IN 

IF DL > < ® THEN PRINT R$;LN;TX$(®);:LN = LN + IN 
REM -—-Programmierung der Eingabe-Befehle-—-- 

IF IC = ® THEN 4599 

FRI=8 17T IC-] 

ID = IMiZI.8) - 1 

PRINT R$;LN; "VTAB";IM(I,1) ;":HTAB";IM(I,2);":"; 
IF ID = ® THEN PRINT " GET C";1IZ(9);"$: 

PRINT C";IZ(®);"$;";: GOTO 4579 

PRINT " INPUT V";IZ(1);"$"; 

IZ(ID) = IZ(ID) + 1:LN=LN + IN 

NEXT I 

PRINT : PRINT D$;"CLOSE": GOSUB 8999: END 

REM —--Zeile eingrenzen-— 

N1 = NC:N2 = 1 

FOR N = 1 TO NC 

S1$ = SC$(I,N) 

IF S1$ > < "" AND (S1$ > < " " OR DM(I,N) > < ®) 
THEN Nl = N: GOTO 5969 

NEXT N 

FOR N = NC TO 1 STEP- 1 

S2$ = SC$(I,N) 

IF S2$ > < "" AND (S2$ > < " " OR DM(I,N) > <Pß) 
THEN N2 = N: GOTO 510® 

NEXT N 

RETURN 

REM -—-Abschließen/Optimieren der Strings-——— 

IF PC THEN 6159 

IF BC THEN 6179 

IF BC 4 THEN PRINT CB$(17); SPC(BC) ;CB$(17);";"; 
IF BC THEN PRINT "TAB(";J;");"; 


7 THEN PRINT SPC(BC) ;CB$(17);";"; 
THEN PRINT CB$(17) ;";TAB(";J;");"; 
= ®: RETURN 
7 THEN PRINT CB$(17); SPC(BC); 
THEN PRINT "TAB(";J;");";cB$(17); 
= : RETURN 
BC < = 19 THEN PRINT SPC(BC); 
BC > 18 THEN PRINT CB$(-17) ;";TAB(";J;");"; 
CB$(17); 
BC = ®: RETURN 
REM ——-Bearbeiten von >"<-—— 
QC = QC + 1: IF QC < 29 THEN PRINT "CHR$(34);";: 
GOTO 329% 
QC = ®: PRINT R$;LN;" PRINT CHR$(34);";:LN = LN + IN 
GOTO 3299 
HOME : REM —--Menü 1-—— 
INVERSE : PRINT SPC(39);: GOSUB 9199: PRINT SPC(1®); 
INVERSE : PRINT "MENUE-GENERATOR";: GOSUB 9199 
PRINT " Änderung der Ersatzwerte (J/N)? E 
GOSUB 9199 
PRINT " Ersatzwerte sind :";: GOSUB 9198 
PRINT " Bildschirm/Zeilen : ";: INVERSE : 
PRINT NL; : GOSUB 929® 
PRINT SPC(14) ;"Spalten : ";: INVERSE : PRINT NC;: 
GOSUB 9199 
PRINT " Basic-Programm/";: GOSUB 9299 
PRINT SPC(1®);"1.Zeilennr. : ";: INVERSE : 
PRINT SL;: GOSUB 9299 
PRINT SPC(1®) ;"Inkrement ‚ ı:: INVERSE : 
PRINT IN; : GOSUB 9199 
PRINT " Menü-(Exec-)JFile/";: GOSUB 9299 
PRINT SPC(16);"Name : ";: INVERSE : PRINT FI$;: 
GOSUB 9199 
PRINT SPC(16);"S1ot : "»: INVERSE : PRINT ST;: 
GOSUB 9299 
PRINT SPC(16) ;"Drive : ";: INVERSE : PRINT DR;: 
GOSUB 9199 
INVERSE : PRINT SPC(39);: NORMAL 
VTAB 5: HTAB 37: GET Cß$: PRINT CP®$; 
IF CÖ$ = "N" THEN RETURN 
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gez MICROMINT 


TUSRUmUHT 
LLTREFFER 


LASAR 16 


— IBM Comp. 64 K, Contr. Bootrom 


TEAC FD 55 B 
3.800; 








Netzteil 15 A 


LASAR ZE 


— Apple comp. 64 K + 


12 KROM + 1 „365; 


6502 + Z8BOA 


Außerdem volles Rückgaberecht innerhalb 

14 Tagen ohne Begründung. 
Apple 
@ Mehrzweckgehäuse It. Abb. 209,— 
® Schaltnetzteile Apple5 A/IBM 15 A 115,— 
® Profitastatur dtsch. LASAR 2000 365,— 
® Interface ab 95,— | 400,— 
® Drucker Epson komp. !!! 898,— | 898,— 


Prompte Belieferung von 100 m? Lagerfläche. 
Kostenlose Tiefstpreishändlerliste noch heute 
schriftlich anfordern — großes Angebot an 
IBM-Comp. 


Generalimporteur MICROMINT Computer GmbH 
Hochdahler Straße 151, 4006 Erkrath 2 
Telex 8589305 mem 


02104/33024 





IBM 
209,— 
350,— 
365,— 












ccp ddataentaechnik 


640 KByte-Drives für Apple Il (//e) 


@ 5'/,- od. 3'/,-Zoll-Format (Teac FD55/35-F) 

@ Umschaltbar auf 40 Track (Apple kompatibel) 

@ Patch für DOS 3.3, UCSD-Pascal, CP/M 2.2, CP/M 2.23 
(60K), PRODOS, AP22, ALS CP/M+ 

® Umfangreiches Manual 

@ Anschlußfertige Auslieferung 

® Ehring-Contr.-Kabel u. 2 Drive (1.2 MB). 


Festplatten für Apple Il (//e) 


@ 5'/, Zoll-Format (Slimline) 

@ Booten direkt von der Festplatte 

@ in DOS 3.3, UCSD-Pascal, PRODOS und CP/M 2.2 

@ läuft auch mit unseren 160 Track-Drives 

® Copy-Programme im Lieferumfang 

@ Umfangreiches Manual 

@ Festplatte (5 — 11,2 MB netto) incl. Controller, 
Netzteil und Patchsoftware . 





DM 1775,— 


ab DM 3250,— 
Akustikkoppler fü bänpis Il (//e) 
@ Serielle und Modem auf einer Karte 


® Hörerverbindung wird mit Kabel herausgeführt 
@ 300 u. 600 Baud voll- u. halbduplex 

® Originate und Answermode 

@ CCITT-Norm (V21) u. Bell 103 (DFÜ weltweit) 
@ ASCII-Express, Modem 7 usw. lauffähig 

®@ Leerplatine incl. ROM, Bausatz oder rule, 


@ Fertiggerät + Manual . DM 398,— 





Alles für Ihren Apple 


Info bei: 


ccp datentechnik 


Herderstraße 12 — 2000 HH 76 
Telefon 0 40/22 56 76 





Peeker 4/85 


ZUSATZ-KARTEN: 
V-24-Schnittstelle ............ 199,- Z-80-Karte ...... 2222222... 139,- 
80-Zeichen-Karte m.Softswitch 236,- 16K-Language-Karte ......... 138,- 
Centronics-Karte von Epson für Graphik... . . 210,- für Text....145,- 
ERPORENER INCH. SOHWAIB . an ae ne ann En 198, - 
Floppy-Controller 
FDC 4 für alle Laufwerke ....... 199,- Bausatz wielinks ............ 179,- 
Leerplatine wie oben incl. Pomu.Eprom ........ nn. nneeenereee nen 130,- 


Auto opatch- -Controller (erphi Controller) 
1x 35 bis 2 x 80 Tr.-Disk, keine Patch-Disk notwendig, Patch DOS 3.3, Diversi- 
DOS 2-C, 4-C (DD MOVER), Pascal 1.1, Pascal 1.2, CPM 2.2, ee. 
1:0.1.1,35:1:3; \ Sie können die Laufwerke untereinander mischen 98, m 


Joy Stick De LuxX6 ..=x: 4.24 59,- Netzteil5A ...........2222... 149,- 
Halbschalen-Gehäuse für 2 Slimline-Laufwerke ... 22... 22 cn ans eee. 65,- 
Gehäuse für 15%" Slimline Laufwerk . . 22:2. 2 o can 39,- 
Gehäuse für 2 5%" Slimline Laufwerke mit Platz für ein Netzteil ......... 159,- 
IBM®-Gehäuse .. . - - - 2 2 2 2 0 nn nern 229,- 
Floppy-Kabel 34pol. für 2 Laufwerke mit Shugart-Bus ......... 2.22.22... 35,- 


Preh Commander Keyboards 


Wir bieten Ihnen die Preh-Qualität auch für Apple. AK 88 Spez. mit Gehäuse, An- 
schlußkabel, Zehner-Tastenfeld, dt. Zeichensatz, Sondertasten für 
Gtri-Codes und Rechenfunktionen 25:4... sus. Re 339,- 


TEAC 3%" Laufwerk FD 35 f5n.- 


Speicherkapazität 1 MB, (formatiert 640 KB) jetzt für nur .. 








Nochmalige Preissenkung bei TEAC: 


TEACFD55A1x40 Track ..... 498,- TEACFD55B2x40 Track ..... 579,- 
TEACFD5S5E1x80 Track ..... 535,- TEACFD5SSF2x80 Track ..... 638,- 
Philipps Slimline Floppy X3134. A, 2x80 Track solange Vorrat ......... nur 638, - 
SONY 3%" Laufwerk .... 2.2.2222 2202 eeeeeeeeee ernennen nur 799,- 
Apple®-kompatibles Laufwerk incl. Gehäuse+ Kabel ................ 599,- 
EPSON FX80O ............... 1670,- EPSON FX100 .............. 2159,- 
EPSONRX80 .............. 1079,- EPSONRX8OFT ............ 1295,- 
Patch-Diskette für SONY 3%” Laufwerke — ermöglicht die Anpassung an Il/lle und 
kompatible Computer .......... 80,- Manual vorab 15,-DM (wird beim Kauf 
der Patch-Diskette angerechnet). dto. für 514" Laufwerke ........ 69,- 
Disketten Döb&Böd SS/DD 10St. 62,- 10 Disketten f.Sony 31.” Laufw. .150,- 
Akustikkoppler AK 300 mit FTZ-Nr. incl. Netzteil .........2.222222222.. 549,- 


Die Er mit Zukunft: 


Speicherkapazität: 2 x 1 MByte for- 
matiert: 2x 640 kByte. Anschlußfertig 
mit PROM-residenter Patchsoftware 
für CP/M 2.2, Apple DOS 3.3, Diversi- 
DOS 2-C, 4-C (DD MOVER), Apple 
Pascal 1.1, Pascal 1.2, Pro-DOS 
1.0.3, 1.1141 zum 

PIOENOT Eee 1640,- 


Low Power Version ........ 1740,- 


10MB Winchester " 490, 











Gesamt-Preisliste anfordern! Preise incl. ges. Mwst. 


Ueding electronics 


DFÜ 02373/66877 
Tel. 02373/63159 


Holtewiese 2 
5750 Menden 1 
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IF Cö$ > < "J" THEN PRINT CHR$ (7); 


POKE 32,1: 
VT = 
VT 
VT 
VT 


POKE 33,38 


18:UL = 1:V® = NC:0OL = 
13:UL = 1:Vß = SL:OL 
14:UL = 1:V9 = IN:OL = 
VTAB 18: HTAB 38: PRINT "x"; 
VTAB 18: HTAB 7: INPUT V4$ 


L = LEN (V4$): IF L > 30 THEN PRINT CHR$ (7);: 


GOTO 7999 
IF L = ® THEN 7299 


L = ASC ( LEFT$ (V4$,1)): IF L< 65 OR L > 98 THEN 


PRINT CHR$ (7);: 
FI$ = V4$ 

VT = 19:UL = 
VT = 2ß:UL = 
RETURN 

HOME : REM -——--Menü 2-——— 
INVERSE : PRINT SPC(39);: 
PRINT SPC(11); 

INVERSE : 
GOSUB 91®®@: PRINT " 


GOTO 7999 


4:V0 = ST:OL = 
1:V8 = DR:OL = 


GOSUB 9199: PRINT " 
LN - IN;: GOSUB 9299 
IF LN — IN > 63999 THEN NORMAL : 
FLASH : PRINT "NICHT ZULAESSIG"; 
GOSUB 9209: PRINT "" 
GOSUB 9299: GOSUB 919: PRINT " 
INVERSE : PRINT SL; 


MMU 2.0 


Memory Managements 
Utilities 


für die Apple lle 64K-Karte 
DOS 3.3 (und ProDOS) 


von U. Stiehl 


1984, Diskette und Manual, DM 98,- 
ISBN 3-7787-1023-1 


Insgesamt enthält die neue „MMU 2.0"- 
Diskette über 25 Programme, die neue 
Einsatzmöglichkeiten für die Extended 80 
Column Card (erweiterte 80-Z-Karte = 
64K-Karte für den Apple Ile) erschließen. 
Ein Teil der Programme laufen auch auf 
dem Apple Il Plus, doch ist „MMU 2.0“ 
primär für 64K-Karte-Besitzer gedacht. 


Gerätevoraussetzung: Apple Ile mit 64K- 
Karte oder lic 


Hüthig Software Service, 
Postfach 10 28 69, D-6900 Heidelberg 


9:UL = 1:V® = NL:OL = 24: GOSUB 9409:NL = VB 
40: GOSUB 9499:NC = Vd 
63999: GOSUB 94ß9:SL = V® 
63998: GOSUB 9400:IN = V® 


6: GOSUB 9400:ST = 
4: GOSUB 9490:DR = 


GOSUB 91989: 

PRINT "MENUE-GENERATOR"; 
File-Name:'"; 

GOSUB 91@®: HTAB 4: PRINT FI$;",S",ST;",D";DR; 
Zeilennummern: 


PRINT TAB(19);: 


Generierung wiederholen(J/N)? "; 


: GOTO 715® 


VTAB 11: 


GOSUB 9299: PRINT " 
PRINT IN;: 
INVERSE : 


Inkrement INVERSE : 
GOSUB 919% 
PRINT SPC(39);: NORMAL 


HTAB 34: GET Cß$: PRINT CP$; 


IF C0$ = "N" THEN VTAB 29: RETURN 
IF c0$ > < "J" THEN 


PRINT CHR$ (7);: GOTO 8129 


POKE 33,39 


VT = 14:UL = 
VT = 15:UL = 
GOTO 


POP : 


1:Vd = 
1:Vd = 
3019 


SL:OL = 
IN:OL = 


65999: 
63998: 


GOSUB 
GOSUB 


94ß0:SL = 
9400:IN = 


REM ---Subroutinen-— 


NORMAL : 
NORMAL : 
NORMAL : 
NORMAL : 
NORMAL : 


vo 
vo 


XX = OF(DA): 


PRINT TAB(49);: 
PRINT SPC(38);: 
RETURN 
PRINT TAB(4®);: 
RETURN 
IF DA = 1 AND ASC (C$) < = 


INVERSE : 
INVERSE : 


PRINT 
PRINT 
INVERSE : PRINT 


64 THEN XX 


AS = ASC (C$) + XX: RETURN 


VTAB VT: 


vl = VAL (V$): 
PRINT CHR$ (7);: 


vo=Vv: 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
RETURN 


"SL." bis 1 


l.Zeilennummer :"; 


Softbreaker 1.0 


Eine softwaremäßige Interrupt-Utility 
für die Apple Ile 64K-Karte 


von U. Stiehl 


1984, Diskette und Manual, DM 48,— 
ISBN 3-7785-1022-3 


Softbreaker ist ein Assemblerprogramm, mit 
dessen Hilfe Programme, die sich von der 
64K-Karte (= Extended 80 Column Card für 
den Apple Ile) starten lassen, unterbrochen, 
gespeichert, geladen und exakt an der Stelle 
der Unterbrechung fortgeführt werden kön- 
nen. Dadurch ist es auch möglich, Siche- 
rungskopien von sogenannten kopierge- 
schützten Programmen herzustellen. 

Mit Softbreaker unterbrochene Programme 
werden komplett, d. h. die ganzen 64K ein- 
schließlich Language Card, in nur ca. 11 Se- 
kunden auf einer formatierten Diskette gesi- 
chert. 

Gerätevoraussetzung: Apple Ile mit 64K- 
Karte 


Hüthig Software Service, 
Postfach 10 28 69, D-6900 Heidelberg 


HTAB 39: INPUT V$: IF V$ = "" THEN RETURN 
IF V1 < UL OR V1 > OL THEN 

GOTO 9499 

RETURN 


:D$ = CHR$ (4) 

D$; "OPEN" ;FI$;" ,S";ST;",D";DR 
D$; "UNLOCK" ;FI$ 

D$ "DELETE" ;FI$ 

D$; "OPEN" ;FI$ 

D$; "WRITE" ;FI$ 


INPUT 2.0 


Ein Bildschirm- 
Maskengenerator 


für DOS 3.3 und ProDOS 
von U. Stiehl 


1984, Diskette und Manual, DM 98,— 
ISBN 3-7785-1021-5 


„Input 2.0“ liegt wahlweise in der Bank 1 
oder Bank 2 der Language Card und wird 
durch einen kurzen Driver in den unteren 
48K aufgerufen. 

Für jedes Feld der Bildschirmmaske lassen 
sich u.a. definieren: Feldlänge (bis zu 255 
Zeichen) — Vtab — Htab — Datentyp (insge- 
samt 8 Typen) — Scrollflag (starre oder dyna- 
mische Maske) — Ctriflag — Füllflag — Lösch- 
flag — Bildschirmflag (40- oder 80-Z-Darstel- 
lung). Innerhalb eines Eingabefeldes besteht 
jeder denkbare Redigierkomfort (Insert, De- 
lete, Rubout, Restore usw.). 
Gerätevoraussetzung: Apple Ile oder IIc; fer- 
ner Apple II+ im 40-Zeichenmodus 


Hüthig Software Service, 
Postfach 10 28 69, D-6900 Heidelberg 
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Peeker-Sammeldisketten 


Sammeldiskette 
Heft 1 und 2, 1984 


Disk #1 





Einzelbezug DM 28,— 
Fortsetzungsbezug DM 20,— 

(Jederzeit kündbar, jedoch mindestens 
6 Disketten) 

(* = nur auf Diskette, nicht im Peeker 
gelistet! Seitenangaben beziehen sich 
auf Beginn des Listings) 

Hüthig Software Service 

Postfach 102869 - 6900 Heidelberg 1 


Disk# 1 
(Heft 1+2, 1984) 


T.DISASSEMBLER.65C02 (1/84, S. 15) 
DISASSEMBLER.65C002 


T.ACCEL.WAIT (1/84, S. 22) 
ACCEL.WAIT 
T.ACCEL.BOOT 
ACCEL.BOOT 
ACCEL.LC.KOPIERER 
T.ACCEL.LC.KOPIE 
ACCEL.LC.KOPIE 
T.ACCEL.ROM.KOPIE1 
ACCEL.ROM.KOPIE1 
T.ACCEL.ROM.KOPIE2 
ACCEL.ROM.KOPIE2 


TURTLE.GRAFIK.MIT.REMS (1/84, S.29) 
TURTLE.GRAFIK.OHNE.REMS * 


DOUBLE.LORES.SOFTSWITCH.DEMO 
(1/84, S. 37) 
DOUBLE.LORES.APPLESOFT.DEMO 
AMPER.DOUBLE.LORES.DEMO 
T.AMPER.DOUBLE.LORES 
AMPER.DOUBLE.LORES 
T.DOUBLE.LORES 

DOUBLE.LORES 


HIRES (1/84, S. 41) 
T.PRINTHIRES 
PRINTHIRES 


DHGR.APSOFT.DEMO (2/84, S. 30) 
AMPER.DOUBLE.HIRES.BAS 
AMPER.DOUBLE.HIRES 
T.AMPER.DOUBLE.HIRES 
DHGR.LINEPLOTTER 
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INSTRING.TEST (2/84, S. 43) 
INSTRING.OBJ 
T.INSTRING.OBJ 
INSTRING.LISA.SOURCE 


LOESCHEN.EINES.ARRAYS 
(2/84, S. 52) 


ULTRATERM.ENGLISCH * (2/84, S. 60) 
ULTRATERM.DEUTSCH * 


PRIMZAHLEN.OVERMEYER * 
(2/84, S. 70) 

PRIM.OBJO * 

PRIM.OBJ1 * 

PRIM.TEST * 
PRIM.TOOLKIT.SOURCE * 


Disk #2 
(Heft 1-2, 1985, DOS-Format) 


T.RAMDISKLC (1-2/85, S. 14) 
RAMDISKLC 


T.IBS.RAMDISKDRIVER (1-2/85, S. 20) 
IBS.RAMDISKDRIVER 
T.AP20.RAMDISKTEST 
AP20.RAMDISKTEST 


T.QUICKCOPY (1-2/85, S. 26) 
QUICKCOPY 
QUICKCOPY.PUFFER 
PRODOS.COPYA 
T.PRODOS.COPYOBJ * 
PRODOS.COPYOBJ 


Sammeldiskette 
Heft 1 und 2, 1985 
DOS 3.3 





PRODOS.PATCH (1-2/85, S. 31) 


T.APPLESOFT.FRE (1-2/85, S. 36) 
T.LC.FRE 

LC.FRE 

FRE-TEST 

T.RAM.FRE * 

RAM.FRE 


T.SCHIRMDISK (1-2/85, S. 44) 
SCHIRMDISK.LISA.SOURCE 
SCHIRMDISK 


T.VIDEXT 
VIDEXT.LISA.SOURCE 
VIDEXT 


GETPAS (1-2/85, S. 70) 
T.GETPAS.ASS * 

GETPAS.ASS 
GETDOS.PASCAL.SOURCE 
COPYDUPDIR.PASCAL.SOURCE 


PRODOS.EDITOR.MACROS 
(1-2/85, S. 86) 


Disk #3 
(Heft 1-2, 1985, CP/M-Format) 


STEUER.84 (1-2/85, S. 47) 
PASS.BAS 
MENUE.BAS 
HELP.BAS * 
A.BAS 
B.BAS 
C.BAS 
D.BAS 
E.BAS 
F.BAS 
G.BAS 
H.BAS 
I.BAS 

J.BAS 
K.BAS 
L.BAS 
M.BAS 
N.BAS 


Disk #4 
(Heft 3-4, 1985) 


TESTGENERATOR (3/85, S. 26) 
SAETZE 

BAHNFAHRT * 

ZU" 

TUN.UND.SOLLEN * 

IRGEND * 


MULTIPRECISION (3/85, S. 32) 


T.WS.TRANSFER (3/85, S. 36) 
WS.TRANSFER 
T.WS.TRANSFER.2 * 
WS.TRANSFER.2 * 

GETCPM 


PRIM.0.SC.SOURCE (3/85, S. 62) 


PRIM.O.BIN 
PRIM.1.5C.SOURCE 
PRIM.1.BIN 

PRIM.FP 


ACCELERATOR.ABSTELLEN 
(3/85, S. 66) 


T.WILDCARD.TEST * (3/85, S. 72) 


WILDCARD.TESTI1 * 
T.WILDCARD.TEST2 * 
WILDCARD.TEST2 * 


XPLOT.DEMO (4/85, S. 18) 
XPLOT.ROUTINE 
T.XPLOT.ROUTINE 


MENUE.GENERATOR (4/85, S. 22) 
T.MACROS.65C02 (4/85, S. 31) 


TERMINAL (4/85, S.36) 
TERMINAL.B 
T.TERMINAL.B 


CAT.ARRAY (4/85, S. 44) 
CAT.SAVER 
EINTRAG.SUCHER 
EINTRAG.ANALYSE 
PRODOS.READER 
T.PRODOS.READER.OBJ 
PRODOS.READER.OBJ 


MOUSESTUFF.PASCAL.SOURCE 
(4/85, S. 51) 
MOUSE.ASS.PASCAL.SOURCE 
TESTMOUSE.PASCAL.SOURCE 
DRAWMOUSE.PASCAL.SOURCE 


INALL.DATA (4/85, S. 70) 
SCREEN80.DATA (4/85, S. 33) 
SCREEN80.SAVER (4/85, S. 76) 





Verkauf Software 


* * Finanzbuchhaltung x x 
für Apple II mit CP/M. Program- 
mierbüro Kurt Kastner, Niko- 
lausstr. 3, 7500 Karlsruhe 


Astrologieprogramme. Info n. 
Voreinsendung 1 DM in Briefmar- 
ken. C. Landscheidt, Im Dorfe 14, 
2804 Lilienthal. 


Profess. Daten-, Text-, Grafikverar- 
beitung, universell einsetzbar, DOS 
3.3 Disc: 159 DM, Info gratis, Demo- 
disc und Gesamtangebot: 10 DM G. 
Basse, Vahlenhorst 9, 29 Oldenburg 


Profi-Rechnungsprogramm (99 
Pos.) DM 89,-. Info: Florian Kopitzki, 
Ameisenbergstr. 57 c, 7000 Stuttgart 1 


APPLE Il-Programmgenerator für 
Eingabemasken bzw. Felder 59,— 
Dateiverwaltung m. Editor, Grafik- 
Listenpaket 65,-, Bstlig. gg. Vor- 
kasse, Info -,80: Fahrenberger, 
Rittershausstr. 4, 5300 Bonn 1 





Für Ihre Kinder/Schüler (8-12 J.)! 
Disk. über Grundrechnungsarten. 
Praxiserprobt! DM 59,-. Lehrer 
G. Eiler, Hof 16, A-6951 Lingenau 


Ankauf Software 


GraForth Animation Guide, Trans- 
Forth ges., Chiffre P 1000 


Suche Patch/Treiber für Profile 
(Apple-Festplatte) unter CP/M 
Chiffre P 1001 


Verkauf Hardware 


Zu wenig SLOTS? Slot Expander 
liefert 8 weitere Slots, per Software 
umschaltbar, Platinenset (2), durch- 
kontaktiert, incl. Beschreibung: 
DM 180,-, Info: E. Tausendpfund, 
Gonsenheimer Spieß 18, 65 Mainz. 


Sprachausgabe-Interface xxx Info: 
Zotter, Triberg 15, 7030 Böblingen 


Erscheinungs- und Anzeigen- 
schlußtermine für peeker 


Ausgabe 


22. 4.85 
20. 5.85 
24. 6.85 
22. 7.85 
26. 8.85 
23. 9.85 
21. 10.85 


29.11.85 
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Erscheinungs- 


Anzeigen- 


termin schluß 


22. 3.85 
19. 4.85 
.85 
.85 
.85 
. 85 
.85 


. 85 


peel 





örse 


EDV-ZUBEHÖR, Akust. Koppler m. 
FTZ 298,-, Markendisk. ab 4,40, 
Papier, Etiketten, Farbb., Preisl. a. 
Anfr. W. Kotschenreuther, Gg.- 
Buchner-Str. 29, 85 Nürnberg 10, 
Tel. 09911-516739 


IBM-Gehäuse für Apple DM 180,— 
Controller (1x35 -2x80) DM 200,— 
beides neuw., Tel.08191/5817 ab 18h 


Verkaufe: 2 BASF Floppys 6106 
im AKA Doppelgehäuse DM 600,-; 
Tel. 0551/91363 


Verkaufe APPLE-Kompa. mit Zu- 
behör, Preis VB, Tel. 02384/3909 
nach 19.00 Uhr 


68000-KARTE IBSAPZO mit ASM- 
SW. 990,- DM, Klaus Schmidt, Dör- 
nerhof, 4100 Duisburg 1, (02.03) 
341729 


Farbgraphik-Interface für NEC 
8023 bzw. Itoh 8510 SCP nur 250,— 
DM, Tel.024 22/7420 


Er IIIYINY 


APPLE Il comp. mit 64 k 6502 und 
Z80 CPU im IBM Gehäuse und se- 
parater Tastatur nur DM 1398,- 
noch heute Liste anfordern über 
weitere Hardware bei 

B. Kraus, Rohrersmünhlstr. 21, 
8540 Schwabach 


* x * Apple Il Supermodem x x x 
alle Standarts, auch BTX, komplett 
auf einer Karte, mit Supersoftware 
superbillig bei 

Rolf Kiupel, Tel. 0431/5554 27 


Disketten, 51/4”, ssidd, 10 Stück 
37,- DM, Tel. 09111/460681 


Ankauf Hardware 


Suche Patch/Treiber für Profile 
(Apple-Festplatte) unter CP/M 
Chiffre P 1001 


SUCHE |l e/c/+ oder MAC und 
Drucker und Software (auch ein- 
zeln), Tel. 0421/701771 


Inserentenverzeichnis peeker 4/85 


beam-verlag, Marburg/Lahn . 


E. Böhmer, DRV, Dreieich 


CCP Datentechnik, Hamburg 


copy team gmbh, erlangen 
erphi electronic, Baldham 
hib, Nürnberg . 


Hoffmann Computertechnik, Kiel 


Interkom, Isernhagen 
Intus, Waldshut-Tiengen 


McGraw-Hill-Book, Hamburg 


E.-W. Meyer, Frohnhausen 
Micromint, Erkrath 
pandabooks, Berlin . 
pandasoft, Berlin 

Softline, Oberkirch 

te-wi Verlag, München 


Ueding electronics, Menden . 
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94999 399999 BECKER 94 
peeker 
BO 





AUFTRAG FÜR KLEINANZEIGEN 


N Bitte veröffentlichen Sie in der nächsterreichbaren Ausgabe nachstehenden 





Text unter folgender Rubrik: 
[} suche Hardware [] suche Software [] Tausch [] verschiedenes 
[] biete Hardware [] biete Software [] Kontakte [] Chiffre 


OTIETTTTTTTTTTT TTS SIT 
Sl TEE EEETTIT SS TT ITS 
> ZEEEREEEREEREREEEEEREEEEEENEEEREEE 
Gelegenheitsanzeigen ® AH HH HH HE 
(JERHEBEEREEEEEEEEEEERENEEEBEEEENE 
HEHEEEBEREEEEEEEEEEEBEEEEBEEBEEBEE 


Bitte jeweils 32 Buchstaben pro Zeile-einschließlich Satzzeichen und Wort- 
zwischenräume. Bitte Absender nicht vergessen. 
Chiffregebühr DM 6,— zuzügl. MwSt. 


4494944 DEEKER 94 


AGAZIN FUR APPLE-COMPUTER 





rse 












Sie können unter dieser 
Rubrik zu einem besonders P 





günstigen Preis 

@ Ihre Hardware und 
Software verkaufen 

@ Ihre Hard- und Software 
suchen 


@ Kontakte knüpfen und 
vieles mehr 








Zu der in »peeker«, Heft ‚Ssete_______ erschienenen 


| Anzeige [| Produktbesprechung 





Musteranzeige privat 


1 Druckzeile a 32 Buch- 
staben nur DM 5,— 
zuzügl. ges. MwSt. 


über 


bitte ich um detaillierte Information. 
Ich wünsche [_] Prospekt, Datenblatt [1 Preisliste [| schriftliches Angebot [| tel. Rückruf 


Produkt und Bestellnummer 
Beispiel: 

gebe ich neben- 
stehende Bestellung 
unter Anerkennung 
Ihrer in der Anzeige 
genannten Liefer- und 
Zahlungsbedingungen 
auf. 


Verkaufe neuwertigen Typenrad- 
drucker mit Apple-Interface. 
Preis auf Anfrage. Tel. 007 





nur DM 17,10 inkl. MwSt. 


mi: 


Unterschrift (für Jugendliche unter 18 Jahren der Erziehungsberechtigte) 


72229) MAGAZIN FÜR APPLE-COMPUTER 


Schreiben Sie uns, wenn Sie Fragen, Ergänzungen oder Anregungen zu 
Aufsätzen in »peeker« haben: 


Musteranzeige gewerblich 





Die einspaltige Millimeter- 
zeile (42 mm breit) kostet 
5,50 zuzügl. ges. MwSt. 





Beispiel: 


Neu im Angebot: Professionelle, 
separate Tastatur für Apple Il 


plus 16 Funktionstasten und sepa- 
ratem Ziffernblock. 
Fa. Keyboard & Co. 





nur DM 137,94 inkl. MwSt. 














Bitte veröffentlichen Sie den um- 
stehenden Text von Zeilen 
a DM in der nächsterreich- 
baren Ausgabe von »peeker« 











Bei Angeboten: Ich bestätige, daß ich alle 
Rechte an den angebotenen Sachen besitze 


Unterschrift 





Karte bitte vollständig ausfüllen 


Vorname, Name 


Firma 


PLZ/Ort 


Telefon mit Vorwahl 


Anschrift der Firma angeben, bei der Sie 
bestellen bzw. von der Sie Informationen 
wünschen 


2 
= 
z 

2 
3: 
& 
Y 





PIPPI 


Karte bitte vollständig ausfüllen 


Vorname, Name 


Firma 





Straße 


PLZ/Ort 


Telefon mit Vorwahl 


es Info -Karte 





ANTWORTKARTE 


peeker-Börse 
Anzeigen-Service 


Dr. Alfred Hüthig Verlag 
Postfach 10 28 69 
6900 Heidelberg 1 


POSTKARTE 


Firma 


Straße 


PLZ/Ort 


POSTKARTE 


peeker 
Redaktion 


Postfach 102869 
6900 Heidelberg 1 


IYPIP 








Produkt- 
Karte 


Wünschen Sie 
weitere Informationen 
zu einem der im Heft 
vorgestellten 
Produkte ? 





Nichts einfacher als 
das. 

Produkt-Karte aus- 
füllen, mit 60-Pfennig 
frankieren und 
absenden. 


Vorher aber nicht 
vergessen: 

kreuzen Sie an, 
welchen Informations- 
wunsch Sie haben. 


Damit erleichtern Sie 
dem Hersteller 

eine gezielte Beant- 
wortung Ihrer Anfrage. 


Zum Schluß tragen 
Sie auf der Rück- 
seite die genaue 
Anschrift des 
Inserenten/Herstellers 
und Ihre vollständige 
Firmenanschrift ein. 





| MAGAZIN FÜR APPLE-COMPUTER 


Die Fachzeitschrift, 
die umfassend aus allen Teilbereichen 
CAE-Journal für Leser, die ständig des CAE berichtet 


informiert sein müssen über: 


@ neue Entwicklungen und Trends Free EEE Pe er ur 
® neue Technologien = Ä 
@ neue Methoden und Verfahren 
® neue Applikationen u ' 
® Wirtschaftliches und Aktuelles nase 











JOURNAL 


us allen Bereichen des 
edle = RR We a ET = 
Computereinsatzes in der ER Bo 
i Einzel 2. 
Technik _ 





Hüthig 


PUBLIKATION 





Sie möchten das CAE-Journal 
kennenlernen? Dann machen 
Sie von unserem nebenstehen- 
den Kennenlern-Angebot Ge- 
brauch 


Ja,ich möchte CAE-Journal kennenlernen und prüfen. Sie schicken mir die 
neueste Ausgabe kostenlos zu. Wenn ich 20 Tage nach Erhalt meines Probe- 
heftes nichts von mir hören lasse, liefern Sie bitte die Zeitschrift bis auf 
Widerruf im Abonnement zum Jahresbezugspreis von DM 60,- inkl. Mwst., 
zzgl. Versandspesen für 6 Ausgaben 1985. Kündigungen sind bis 8 Wochen 
vor Jahresende schriftlich an den Verlag zu richten 


Name, Vorname 


Firma 
Abtilg. 
Straße 
Coupon ausgefüllt SEI“ 
einsenden an: 
Datum | Unterschrift 


CAE-Journal, Leserservice 
Postfach 10 28 69 
D-6900 Heidelberg 1 


Wichtig: Wenn ich CAE-Journal nicht regelmäßig lesen möchte, schicke ich innerhalb von 20 Tagen 
eine kurze Mitteilung an den Verlag und alles ist für mich erledigt 
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Datum Unterschrift 











von Dipl.-Oec. Edgar Meyzis 


Nachfolgend wird beschrieben, wie Ma- 
krobefehle für Assembler des Typs 
MERLIN und BIG MAC entwickelt wer- 
den können. Im „Peeker“, Heft 1/1984 
wurden die zusätzlichen Befehle der 
CPU 65C02 und ein entsprechender 
Disassembler vorgestellt. Die Darstel- 
lung knüpft daran an und bietet eine 
Möglichkeit, den erweiterten Befehls- 
satz der CPU mit Hilfe von Macros kom- 
fortabel zu nutzen. Inzwischen gibt es 
einige Assembler, die die neuen 65C02- 
Opcodes automatisch unterstützen, 
und zwar „Merlin.Pro“ (z.Zt. noch nicht 
in Deutschland erhältlich) oder „SC- 
Macroassembler“ (über Fa. Karl-Heinz 
Weiß, 2940 Wilhelmshaven, Am Wie- 
senhof 17, erhältlich). Da sich jedoch 
nicht jeder wegen der neuen Opcodes 
einen neuen Assembler kaufen will, 
sind die nachfolgenden Macrobefehle 
eine nützliche Ergänzung. 
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Makros für die neuen 
Befehle des 65C02 


1. Struktur von Makrobefehlen 


Bevor auf die Makrobefehle für den 65C02 
eingegangen wird, ist es zweckmäßig, sich 
kurz mit ihrer Grundstruktur und der Im- 
plementierung auseinanderzusetzen. Die 
erste und die letzte Zeile eines Makrobe- 
fehls ist an folgende Form gebunden: 


LABEL MAC 
EOM bzw. <<< 


Die erste Zeile enthält den Namen (LA- 
BEL) des Befehls und den Hinweis (MAC), 
daß die Definition eines Makros folgt. Mit 
„EOM“ (End of Macro) bzw. „<<<“ ist 
eine Definition abzuschließen. Makrobe- 
fehle werden in einem Assemblerpro- 
gramm wie folgt aufgerufen: 


PMC LABEL bzw. >>> LABEL 


Der Aufruf wird durch den Assembler an 
der Buchstabenfolge „PMC“ (Put Macro) 
bzw. an den drei Rechtspfeilen (Größer- 
Zeichen) erkannt. Als LABEL können des- 
halb durchaus Zeichenfolgen verwendet 
werden, die — allein eingesetzt — für den 
Assembler eine spezifische Bedeutung 
haben (z.B. Mnemonics für Operation 
Codes). Sind bei Aufruf eines Makrobe- 
fehls Parameter zu übergeben, so ist dem 
LABEL eine Parameterliste anzufügen: 


>>> LABEL.Parameter;...,‚Parameter 


Es können bis zu acht Parameter überge- 
ben werden. Mit ihrer Spezifizierung wird 
zugleich eine entsprechende Anzahl loka- 
ler Variablen deklariert. Sie nehmen die 
Werte der übergebenen Parameter in der 
Reihenfolge ihrer Nennung an. Die Be- 
zeichnungen der Variablen sind vorge- 
geben: 


11...]8 Amerikanischer Zeichensatz 
U1......U8 Deutscher Zeichensatz 








Die Parameter, die in die Variablen einge- 
hen, müssen vor Aufruf der jeweiligen Ma- 
Krobefehle definiert sein, um uneinge- 
schränkt korrekte Ergebnisse zu erhalten. 
Deshalb ist es im allgemeinen unzweck- 
mäßig, in der Parameterliste LABELS auf- 
zuführen, die erst später im Programm 
folgen. Es besteht jedoch eine wichtige 
Ausnahme: Standardanweisungen an den 
Assembler für die Erzeugung von Objekt- 
code (z.B. LDA LABEL) werden auch dann 
stets genau ausgeführt, wenn das LABEL 
sich auf eine spätere Stelle im Programm 
bezieht. Von dieser Möglichkeit wurde bei 
der Erarbeitung der Makrobefehle für den 
65C02 mehrfach Gebrauch gemacht. 

Bei der Definition von Makrobefehlen ist 
es häufig erforderlich, die folgende Kon- 
trollstruktur einzusetzen, um eine kondi- 
tionale Assemblierung zu erreichen: 


DO Ausdruck 
ELSE 
FIN 


Nimmt der Ausdruck einen Wert ungleich 
null an, so wird der von DO und ELSE 
eingeschlossene Programmteil ausge- 
führt. Ist hingegen der Ausdruck null, so 
werden die Instruktionen zwischen ELSE 
und FIN abgearbeitet. 

Den allgemeinen Teil abschließend bleibt 
noch zu erwähnen, daß Makrobefehle den 
Anfang eines Quellprogramms bilden 
müssen. Sie sind in ihrer Gesamtheit von 
„DO 0“ und „FIN“ einzuschließen, um zu 
vermeiden, daß für sie bei der Assemblie- 
rung Objektcode erzeugt wird. 


2. Anforderungen an 65C02-Macro- 
befehle 


Wir können uns nun der konkreten Aufga- 
benstellung zuwenden, d.h. der Definition 
von Makrobefehlen, die die Operation 
Codes für den erweiterten Befehlssatz des 
65C02 erzeugen. An die zu erarbeitenden 
Makros sind folgende Anforderungen zu 
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stellen: 

— als LABEL möglichst standardisierte 
Mnemonics verwenden 

— übergebene Parameter formal auf Rich- 
tigkeit prüfen 

— ggf. Fehlermeldungen generieren und 
Assemblierung abbrechen 

— Bezugnahme auf folgende Programm- 
teile unter Angabe von LABEL ermögli- 
chen. 


Die Forderungen werden von den vorlie- 
genden Makrobefehlen erfüllt. Dazu ist es 
teilweise erforderlich, Fehler zu simulie- 
ren, um Meldungen zu erzeugen, die die 
tatsächliche Situation richtig beschreiben. 


3. Die Makrobefehle für den 65C02 


Das beigefügte Listing enthält die Makro- 
befehle in alphabetischer Reihenfolge. Der 
Definition der Befehle liegen fünf Muster 
zugrunde, die sich hauptsächlich durch 
ihren Grad an Komplexität unterscheiden. 
Je ein Befehl aus den sich so bildenden 
fünf Gruppen wurde exemplarisch aus- 
führlich kommentiert, um das Vorgehen zu 
verdeutlichen. Bei Einarbeitung in die Auf- 
gabenstellung wäre es von Vorteil, mit der 
Analyse der einfachsten Befehle zu begin- 
nen und den Beispielen zu folgen. 


Beispiel 1: DECREMENT 
ACCUMULATOR 

Es bietet sich an, z.B. die Definition des 
Makrobefehls „DEA“ zu betrachten: Das 
Makro fügt in den Objektcode lediglich das 
Byte „3A“, den Operation Code für 
„DEA“ ein. Dazu werden keine Variablen 
benötigt; die Parameterliste bleibt somit 
leer. 


Beispiel 2: BRANCH ALWAYS 

Als typisches Beispiel für das nächste Mu- 
ster dient der Befehl „BRA“, der wie folgt 
aufzurufen ist: 


>>> BRA.ADDR bzw. >>> BRA.LABEL 


Als Parameter ist die Adresse durch ihren 
Zahlenwert oder symbolisch anzugeben 
(z.B. $8050 oder ZIEL). Zunächst wird ein 
bedingter Sprung zu der Adresse simu- 
liert, die die Variable „]1“ enthält. Dabei 
wird die maximal mögliche Sprungdistanz 
beachtet. Falls erforderlich, wird eine ent- 
sprechende Fehlermeldung erzeugt. 
Durch Simulation eines bedingten Sprun- 
ges ist es möglich, zu Programmteilen zu 
verzweigen, die erst später folgen. 


Beispiel 3: ADD WITH CARRY INDIRECT 
Das dritte Muster wird durch den Befehl 
„>>> ADCI.ZP-ADDR“ repräsentiert. 


Peeker 4/85 





Als Parameter ist eine Adresse auf der 
Zero-Page zu übergeben. Durch die In- 
struktion „ADC (]1,X)“ wird die Einhaltung 
dieser Bedingung geprüft und zugleich die 
Adresse im Objektcode gesetzt. Es ist an- 
schließend nur noch erforderlich, den 
Operation Code für die indirekte Addition 
einzusetzen. Der Makrobefehl weicht von 
dem standardisierten Mnemonic ab, um 
das Lesen des Quellprogramms zu er- 
leichtern. 


Beispiel 4: STORE ZERO WITH INDEX 
Das vierte Grundmuster ist in dem Befehl 
„>>> STZX.ADDR" zu erkennen. Vor 
der Generierung von Objektcode wird mit 
der Variablen „JANFG“ die aktuelle Adres- 
se des Programmzeigers festgehalten. 
Anschließend wird ein Speicherzugriff 
(STA ]1,X) simuliert und die Länge des 
Codes (]BYTES) festgestellt. Je nach 
Adresse kann es sich nur um einen Zwei- 
byte- oder um einen Dreibytebefehl han- 
deln. Dieser Sachverhalt bestimmt die fol- 
gende bedingte Assemblierung. Ergibt der 
Ausdruck „]JBYTES-2“ den Wert null, so 
handelt es sich um einen Zweibytebefehl; 
somit ist der Operation Code „74“ zu set- 
zen. Liegt hingegen die übergebene 
Adresse nicht auf der Zero-Page, so ist der 
Code „IE“ einzufügen. 


Beispiel 5: BRANCH ON BIT RESET 

Der Befehl „>>> BBR.0-7;ZP-ADDR; 
ZIEL“ spiegelt das fünfte und letzte Mu- 
ster wider. Der erste Parameter darf nur im 
Wertebereich von O bis 7 liegen. Dies wird 
durch Auswertung des Ausdrucks 
„II&FFF8" geprüft, indem die Variable 
„]1“ durch die logische Operation „AND“ 
mit der Konstanten „$FFF8“ verknüpft 
wird. Liegt der Wert der Variablen außerhalb 
der angegebenen Grenzen, so wird eine 
Fehlermeldung generiert. Aus dem ersten 
Parameter ist der Operation Code entspre- 
chend des zu testenden Bits zu gewinnen. 
Dazu wird das untere Halbbyte in das obe- 
re durch eine Multiplikation mit 16 (= $10) 
„geschoben“; anschließend wird das un- 
tere Halbbyte durch die logische Opera- 
tion „OR“ (.) mit „$F“ gefüllt (BBR1 EQU 
11%*$10.$0F). 


Es soll nicht unerwähnt bleiben, daß die 
Anwendung der Makrobefehle auch einen 
kleinen Haken hat. Die Übersichtlichkeit 
der Assemblerlistings leidet darunter, daß 
vorläufige Operation Codes gesetzt und 
anschließend substituiert werden. Der Zu- 
gewinn an Komfort bei der Programmie- 
rung gleicht diesen Mangel jedoch aus. 
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MACROS zur Unterstützung 
der neuen Befehle des 650®2 
von Edgar Meyzis, Nov. 1984 
(für Big Mac bzw. Merlin) 
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DO 9 
ADC INDIRECT OP CODE 72 


Syntax: >>> ADCI.ZP-ADDR o. 
>>> ADCI.ZP-LABEL 


DCI MAC 


ADDR u. vorläufigen OP CODE setzen; 
Fehlermeldung, wenn ADDR n. auf ZP 


ADC (Ü1,X) 

Zeiger f. Code zurück auf ADC-Byte 
DS -—-2 

vorläufigen OP CODE ersetzen 
HEX 72 ‚ ADC IND 


Zeiger vorsetzen, hinter ADDR 


DS l 
<<< 
AND INDIRECT OP CODE 32 


Syntax: >>> ANDI.ZP-ADDR o. 
>>> ANDI. ZP-LABEL 


NDI 


; AND IND 


<<< 


OP CODES BF-7F 


BBR [#(9-7)] 


Syntax: >>> BBR.®-7;ZP-ADDR ; ADDR 
>>> BBR.®-7;ZP-LABEL ; LABEL 


BR MAC 
Byte für OP CODE reservieren 
DS l 


Sprungdistanz prüfen und setzen, 
ggf. BAD BRANCH melden 


BNE Ü3 
Zeiger zurück auf Byte f. OP CODE 
DS -3 
Ist der erste Operand kleiner 8 ? 
DO ÜI&$FFFE 
somit BAD OPERAND simulieren 


nein, 


JMP $+#9 
ELSE 


liegt ADDR auf der ZPG? Ggf. Fehler 
melden; falls o.k., ADDR setzen 


LDA (Ü2,X) 
Zeiger auf Byte für OP CODE setzen 
DS -2 


OP CODE berechnen; dazu unteres 


31 


32 


* Halbbyte i. 
* anschl. unt 
* 
BBRl EQU 
%* 


d. obere schieben und 


. Halbbyte $F setzen 


Ü1x$19.$pF 


* OP CODE setzen 


“ 
DFB 
FIN 
DS 
<<< 


rk KK Kr 


BS "MAC 


DS 


* 
* 
* 
* 
. 
” 
B 


IT MAC 
DO 
JMP 


ELSE 


LDA 

DS 

HEX 

DS 

FIN 

<<< 
* 


BBS [#(9-7)] 


Syntax: >>> 


BIT IMMEDIATE 


BBR1 


l 


OP CODES 8F-FF 


BBS. 9-7 ; ZP-ADDR ; ADDR 
BBS.®-7;ZP-LABEL ; LABEL 


1 

Ü3 

-3 

Ü1&$FFFE 

$#9 

(02,X) 

-2 

8+U1x$19.$OF 

BBS1 ; BBS 


1 


OP CODE 89 


Syntax: >>> BIT.$NUMBER 
>>> BIT.LABEL 


ÜL&$FFOG 
$#9 


ül 

RB 

89 : BIT IMM. 
1 


* BIT ABS,X / ZPG,X OP CODES 3C, 34 


* 

* Syntax: >>> 

* >>> 

* 

BITX MAC 

ÜANFG EQU 
STA 

ÜBYTES EQU 
DS 
DO 
HEX 
ELSE 
HEX 
FIN 
DS 
<<< 


OP 


* Syntax: >>> 
* >>> 
%* 

BRA MAC 


BITX.ADDR o. 
BITX.LABEL 


* 

9% 

#*-UÜANFG 

-ÜBYTES 

ÜBYTES-2 

3C ‚ BIT ABS,X 


54 ; BIT 2PG,X 


ÜBYTES-1 


CODE 8® 


BRA.ADDR 
BRA.LABEL 


vorläufigen OP CODE für bedingten 
Sprung einfügen; 

Sprungdistanz prüfen und ggf. 

BAD BRANCH melden; Distanz setzen 


BNE 


ül 


Zeiger zurück auf vorl. OP CODE 


DS 


OP CODE für 


HEX 


-2 
BRA setzen 


80 


Zeiger vorsetzen, hinter Distanz 


DS 1 
<<< 
CMP INDIRECT OP CODE D2 


Syntax: >>> CMPI.ZP-ADDR o. 
>>> CMPI.ZP-LABEL 


* KK Kr 


Q 
= 
"u 
4 


MAC 
CMP (Ü1,X) 
DS -2 
HEX D2 ; CMP IND 
DS di 
ER 
* 
* DEA (DECREMENT ACCU ) OP CODE 3A 
* 
* Syntax: >>> DEA 
* 
DEA MAC 
4 
* OP CODE für DEA setzen 
. 
HEX 3A 
<<< 
EOR INDIRECT OP CODE 52 
Syntax: >>> EORI.ZP-ADDR o. 
>>> EORI.ZP-LABEL 


ORI MAC 
EOR (Ü1,X) 
DS -2 
HEX 52 ; EOR IND 
Ds 1 
<<< 
%* 
* INA ( INCREMENT ACCU ) OP CODE 1A 
* 
* Syntax: >>> INA 
%* 
INA MAC 
HEX 1A 
<<< 


JMP INDIRECT,X OP CODE 7C 


Syntax: >>> JMPIX.ADDR o. 
>>> JMPIX.LABEL 


ADDR muß nicht auf ZPG liegen ! 


kA KK KK KR 


MPIX MAC 
HEX 7C 
DA Üül 
<<< 


; JMP IND,X 
LDA INDIRECT OP CODE B2 


Syntax: >>> LDAI.ZP-ADDR o. 
>>> LDAI.ZP-LABEL 


„*x kr * * 


[a 
oO 
> 
4 


MAC i 

LDA (U1l,X) 

DS -2 

HEX B2 ; LDA IND 
DS l 
<<< 
ORA INDIRECT OP CODE 12 
Syntax: >>> ORAI.ZP-ADDR o. 
>>> ORAI.ZP-LABEL 


RAI MAC 
ORA (Ü1,X) 
DS -2 
HEX 12 : ORA IND 
Ds 1 
<<< 


OP CODE DA 


* Syntax: >>> 


PHX MAC 
HEX 
<<< 


PHX 


DA 


OP CODE 5A 


>>> 


MAC 
HEX 
<<< 


PHY 


5A 


* PLX OP CODE FA 


* 

* Syntax: >>> 

* 

PLX MAC 
HEX 
<<< 

* 


PLX 


FA 


* PLY OP CODE 7A 


* 

* Syntax: >>> 

* 

PLY MAC 
HEX 
LL« 


RMB [#(9-7)] 


Syntax: >>> 
>>> 


„*ekrkKKRr Kr 


5 


MAC 
EOR 
DS 
DO 
JMP 
ELSE 
EQU 
DFB 
FIN 
DS 
<<< 
* 


* SBC INDIRECT 


* Syntax: >>> 

* >>> 

* 

SBCI MAC 
SBC 
DS 
HEX 
DS 
<<< 


SMB [#(9-7)] 


Syntax: >>> 
>>> 


nk kr 


MB MAC 
EOR 
DS 
DO 


DFB 

FIN 

DS 

<<< 
» 


* STA INDIRECT 


* Syntax: >>> 

* >>> 

%* 

STAI MAC 
STA 
DS 
HEX 
DS 
<<< 


- 
* STZ ABS / ZPG 


PLY 


7A ; PLY 


OP CODES 97-77 


RMB . ö-7 ; ZP-ADDR 
RMB. 8-7; ZP-LABEL 


(02,2) 
-1 
ÜL&$FFFE 
$+9 


Ü1lx$19.$OF 
RMBl 


l 


OP CODE F2 
SBCI.ZP-ADDR o. 
SBCI.ZP-LABEL 


(Ü1,xX) 

-B 

F2 ; SBC IND 
1 


OP CODES 87-F7 


SMB.ß-7 ; ZP-ADDR 
SMB.®-7; ZP-LABEL 


(02,X) 
-1 
Ül&$FFF8 
$+9 


8+UÜ1#$19.$OF 
SMBl ; SMB 


l 


OP CODE 92 
STAI.ZP-ADDR o. 
STAI.ZP-LABEL 


(01,X) 

-2 

92 : STA IND 
1 


OP CODES 64,9C 
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349 %* 

350 %# Syntax: >>> STZ.ADDR o. 

351 * >>> STZ.LABEL 

352 %* 

353 STZ MAC 

354 ÜANFG EQU x 

355 STA Ul 

356 ÜBYTES EQU x-ÜANFG 

357 DS -ÜBYTES 

358 DO  ÜBYTES-2 

359 HEX 9C ; STZ ABS 
360 ELSE 

361 HEX 64 ; STZ ZPG 
362 FIN 

363 DS DÜBYTES-1l 

364 <<< 

365 * 

366 x& STZ ABS,X / ZPG,X OP CODES 74, 9E 
367 * 

368 x Syntax: >>> STZX.ADDR o. 

369 x >>> STZX.LABEL 

370 * 

371 STZX MAC 

S7T2 %* 

373 %* aktuellen Zeigerstand merken 

374 x 

375 ÜANFG EQU x 

376 x* 

3577 % Speicherzugriff simulieren, um über 
378 x vorläufigen OP CODE ein Byte zu re- 
379 % servieren und die ADDR zu setzen 
380 x 

381 STA Ül,X 

382 x 

383 %* Länge der Instruktion berechnen 





SCREEN80 
80-Z/Z-Bildschirm-Dump von U. Stiehl 


Druckt (nach PR#3) den Bildschirminhalt der 
8@-Zeichenkarte von IIc/IIe auf Image-Writer 
sowie auf Epson MX-8® und Epson FX-89, falls 
letztere den Befehl Ctrl-I-N zum Abstellen 
des Bildschirmechos kennen. SCREEN8® belegt 
den Speicher $0309-$@3AD. Der Quellcode 
befindet sich auf der Peeker-Sammeldisk. 


Dump aufrufen mit CALL 768 
(ohne vorheriges PR#l) 


Mögliche Modifikationen: 

POKE 771, S (= Drucker-Slot 1-7; normal 1) 
POKE 772, E (= Erste Zeile 1-22; normal 1) 
POKE 773, L (= Letzte Zeile 2-24; normal 24) 


1d DATA 76,10,3,1,1,24,0,0,0,9 

11 DATA 165,54,141,8,3,165,55,141,9,3 

12 DATA 173,3,3,32,149,254,160,9,140,7 

13 DATA 3,185,45,3,240,17,32,171,3,172 

14 DATA 7,3,200,208,239, 137,206,0,174,174: 
REM 137, 286, ® = Ctrl-I + N + Endmarker 
REM 174 ... Füller für längeren Befehl 

15 DATA 174,174,174, 173,4,3,56,233,1,141 

16 DATA 6,3,32,193,251,160,0,169,169,141 

17 DATA 85,192,209,49,298,14,141,84,192,299 

18 DATA 49,208,7,200,192,40,208,237,249,42 

19 DATA 169,9,140,7,3,173,6,3,32,193 

20 DATA 251,172,7,3,141,85,192,32,154,3 

21 DATA 172,7,3,141,84,192,32,154,3,172 

22 DATA 7,3,200,192,49,208,221,169,141,32 

23 DATA 164,3,238,6,3,173,6,3,205,5 

24 DATA 3,144,175,173,8,3,133,54,173,9 

25 DATA 3,133,55,96,177,40,9,128,201,16® 

26 DATA 176,2,105,64,141,84,192,32,171,3 

27 DATA 96,108,54,® 

28 RESTORE 

29 FOR X = 768 TO 941: READ Y: POKE X,Y: NEXT 
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4 ASSEMbIlER 24 


419 STA Ül 


385 ÜBYTES EQU x-ÜANFG 420 ÜBYTES EQU x-ÜANFG 


386 
387 
388 
389 
399 
391 
392 
393 
394 
395 
396 
397 
398 
399 
Add 
adl 
402 
403 
404 
405 
406 
407 
a08 
409 
41 
all 
412 
413 
414 
415 
416 


* 
* 
* 
* 


* 
* 
* 


* 
* 
* 
* 


* 
* 
* 
* 


* 
* 


* 
* 
* 
* 
* 
* 


a2l DS _-ÜBYTES 
Zeiger auf Byte mit vorl. OP CODE 422 DO _ÜBYTES-2 
zurück 423 HEX IC ; TRB ABS 
424 ELSE 
DS -ÜBYTES 425 HEX 14 ; TRB ZPG 
426 FIN 
Ist es ein Zweibytebefehl? 427 DS ÜBYTES-1 
428 <<< 
DO  ÜBYTES-2 429 x 
430 x TSB ABS / ZPG OP CODES ®4,dC 
nein, Dreibytebefehl; entspr. 4531 x 
OP CODE setzen 452 x Syntax: >>> TSB.ADDR o. 
433 x >>> TSB.LABEL 
HEX 9E ‚ ABS,X 434 %* 
ELSE 435 TSB MAC 
436 ÜANFG EQU x 
ja, Zweibytebefehl; entspr. 437 STA Ül 
OP CODE setzen 438 ÜBYTES EQU x-ÜANFG 
439 DS _-ÜBYTES 
HEX 74 : ZPG,X 440 DO ÜBYTES-2 
FIN 44] HEX GC ‚ TSB ABS 
442 ELSE 
Zeiger vorsetzen, hinter ADDR 443 HEX 04 ; TSB ZPG 
DS ÜBYTES-1 444 FIN 
<<< 445 DS ÜBYTES-1 
446 <<< 
TRB ABS / ZPG OP CODES 14,1C 447 FIN 


Syntax: >>> TRB.ADDR o. Hinweis: Da viele eine Apple mit deutschem 
>>> TRB.LABEL Zeichensatz benutzen, haben wir 
hier das Merlin-Macro-Symbol 


417 TRB MAC ] = U nicht kodiert. Anm. d. Red. 


418 ÜANFG EQU x 





Apple DOS 3.3 — 
Tips und Tricks 


von U. Stiehl 
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ausführlich kommentierten Programm- 
listings, kart., DM 28,— 
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Terminal-Pro 
un sur den Apple Il 


Inzwischen gibt es in fast jeder Großstadt 
mindestens eine Mailboxstation. Um 
auch mit dem Apple Zugang zu diesen 
Diensten zu erhalten, benötigt man nicht 
nur einen Akustikkoppler oder ein Modem, 
sondern auch ein entsprechendes Pro- 
gramm. Ein solches Programm will ich Ih- 
nen hier vorstellen. Als Voraussetzung be- 
nötigt man einen Apple Il mit dem Be- 
triebssystem DOS und eine serielle 
Schnittstelle in Slot 2. Bei Verwendung 
eines anderen Slots als Slot 2 oder eines 
anderen Bausteines als des 6850 müssen 
die entsprechenden Werte in dem Pro- 
gramm modifiziert werden. Das Programm 
kennt drei Betriebsarten. 


1. Dialog-Modus 


In dieser Betriebsart ist der Apple ein 
asynchron arbeitendes Terminal. Jeder 
Tastendruck wird an die Gegenstelle ge- 
sendet. Ausnahme: Ctri-B zeigt die aktu- 
elle Empfangsspeicheradresse an und 
ESC beendet den Modus durch Rück- 
sprung in das Applesoft-Programm. Jedes 
empfangene Zeichen wird auf dem Bild- 
schirm dargestellt und im internen Spei- 
cher, dem Empfangsspeicher, abgelegt. 
Es findet eine automatische LF-Unterdrük- 
kung (Zeilenvorschub Ctrl-J) statt, um un- 
nötige Leerzeilen auf dem Bildschirm zu 
vermeiden. Das erste LF nach einem CR 
(neue Zeile Ctrl-M) wird ignoriert. 

Der Empfangsspeicher kann als Binärfile 
abgespeichert und später weiterverarbei- 
tet werden. Man kann sich also nachträg- 
lich den ganzen Dialog ansehen und inter- 
essante Stellen oder Menüs ausdrucken, 
um so beim nächsten Mal Zeit zu sparen. 
Es ist also nicht unbedingt nötig, darauf zu 
achten, ob man Download aktiviert hat. 
Wenn der Empfangsspeicher voll ist, be- 
endet das Programm selbsttätig den Dia- 


gramm 


Iog-Modus und gibt einen entsprechenden 
Hinweis auf dem Bildschirm. Bei jedem 
Verlassen des Dialogs sendet das Pro- 
gramm XOFF (Ctrl-S), um ein Timeout in 
der Gegenstelle zu verlängern. Viele Mail- 
boxen nehmen darauf Rücksicht. Wird der 
Dialog-Modus aktiviert, wird XON (Ctrl-Q) 
gesendet, um der Gegenstelle die erneute 
Bereitschaft zu signalisieren. 


2. Upload-Modus 


In dieser Betriebsart werden ASCII-Datei- 
en gesendet. Wird keine Textdatei auf der 
Diskette gefunden, so versucht das Pro- 
gramm eine Binärdatei in den Speicher zu 
laden. Da in diesem Fall der Emp- 
fangsspeicher überschrieben wird, sollte 
er vorher gespeichert werden. Aus Sicher- 
heitsgründen wird dies von dem Pro- 
gramm noch einmal abgefragt. Dann wird 
der Ausgabevektor auf das Terminalpro- 
gramm gesetzt und die Datei zeichenwei- 
se gesendet. Ein Abbruch ist mittels ESC 
jederzeit möglich. In der Betriebsart Voll- 
duplex findet eine automatische Korrektur 
statt, indem das Empfangsecho mit dem 
gesendeten Zeichen verglichen wird. Bei 
Nicht-Übereinstimmung wird Ctri-H (BS) 
gesendet und die Übertragung des Zei- 
chens wiederholt. 


3. Download-Modus 


In dieser Betriebsart können Dateien emp- 
fangen werden. Jedes empfangene Zei- 
chen wird im Empfangspuffer abgelegt. 
Auch hier findet eine automatische LF- 
Unterdrückung wie beim Dialog-Modus 
statt. 

Im Gegensatz zum Dialog-Modus ist hier 
die Tastatur bis auf die Tasten ESC und 


Peeker 4/85 





Ctri-B gesperrt. Außerdem wird in der Be- 
triebsart Vollduplex jedes empfangene 
Zeichen geechot. Damit wird der Gegen- 
stelle die Möglichkeit gegeben, die Über- 
tragung auf Korrektheit zu kontrollieren. 
Nach Beendigung des Modus wird die ak- 
tuelle Adresse des letzten abgespeicher- 
ten Zeichens angezeigt. 


In den Betriebsarten 2 und 3 beherrscht 
das Programm das XON/XOFF-Protokoll. 
Weitere Steuerzeichen, die während der 
Übertragung benutzt werden, sind: 


Ctrl-B — STX Es beginnt eine neue Datei, 
lösche den Empfangsspeicher 

Ctrl-C - ETX Die Datei ist zu Ende 

Ctrl-H — BS Lösche letztes Zeichen 

Ctrl-Q — XON Fahre mit dem Senden fort 

Ctrl-S — XOFF Beende kurzzeitig die 
Übertragung 

Ctrl-X — CAN Gegenstelle wünscht Ab- 
bruch der Übertragung. 


Nach Beendigung einer Übertragung wird 
ein Fehlercode auf dem Bildschirm ange- 
zeigt. Dieser setzt sich folgendermaßen 
zusammen. Code: „BF“ steht für Be- 
triebsart und Fehlercode. 


Betriebsart: 

0 - Empfangen 

2 — Download 

4 — Warten auf XON 


8 — Senden 
Fehlercode: 
0 - Kein Fehler 


1 - ESC-Operator-Eingriff 
2 — Ctrl-X empfangen (CAN) 
3 - Timeout erreicht 


Bei den Funktionen UPLOAD und DOWN- 
LOAD ist zu beachten, daß die Gegenstel- 
le den gleichen Dialog-Modus (das gleiche 
Übertragungsprotokoll) erfüllt. Nicht alle 
Mailboxsysteme senden Kontrollzeichen 
als Echo zurück. Die Fehlerabfrage ist in 
diesem Fall aus dem Programm herauszu- 
nehmen. Zur Zeit gibt es leider noch keine 
bindende Vereinbarung. Im Zweifelsfall 
muß in Halbduplex ohne automatische 
Korrektur übertragen werden. 


Alle zeitkritischen Programmteile sind in 
Assembler geschrieben. Das Menü wurde 
der Einfachheit halber in Applesoft reali- 
siert. So kann das Hauptprogramm pro- 
blemlos an individuelle Wünsche angepaßt 
werden. Das Applesoft-Programm gliedert 
sich in 4 Teile: 
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1000-1500 Hauptprogramm 

1500-2000 Initialisierung 

2000-8000 Unterprogramme (It. Menü) 
9000-9999 Sonstige Unterprogramme. 
Interessant dürfte das Line-Input-Unter- 
programm (ab 9080) sein. Es wird nicht 
der String mittels GET-Befehlen zusam- 
mengesetzt, sondern die Monitorroutine 
GETLN aufgerufen und der String durch 
PEEK aus dem Eingabespeicher ab $0200 
ausgelesen. Diese Methode dauert zwar 
etwas länger, arbeitet aber auch beim Le- 
sen von Textdateien einwandfrei. Die Pau- 
se während des Auslesens stört auch 
nicht weiter, da die Gegenstelle nach ei- 
nem CR meistens etwas Zeit benötigt, um 
den empfangenen Satz abzuspeichern. 
Das Programm gibt folgende Befehle an 
das serielle Schnittstellen-Treiberpro- 
gramm, eingeleitet durch Ctrl-I: 


TD- schalte RTS an 

TS - schalte RTS ab 

Tx - selektiere Übertragungsgeschwindig- 
Keit 

U9Y9N - arbeite ohne automatisches CR 

C — schalte Echo auf Bildschirm ein (wenn 
vorhanden, nur bei Simplex benötigt) 

O — schalte Echo auf Bildschirm aus 


Der Empfangsspeicher beginnt bei $2500 
und kann maximal bis zur DOS-Grenze 
$9600 anwachsen. Ab $9500 erscheint 
aber schon die Meldung: „PUFFER ZU 
GROSS“. Der Speicher muß nun gesi- 
chert oder gelöscht werden. Wenn das 
Applesoft-Programm erweitert werden 
soll, muß man unter Umständen das As- 
sembler-Programm verschieben, um neu- 
en Platz zu erhalten. Das Assembler-Pro- 
gramm grenzt unmittelbar an das Ap- 
plesoft-Programm. Es beginnt mit einer 
Sprungtabelle und einer Parameter- 
tabelle. Die Hauptteile des Programms 
können also geändert werden, ohne daß 
das Applesoft-Programm an neue Adres- 
sen angepaßt werden muß. Das Assem- 
bler-Programm besteht aus den Teilen 
Dialog, Upload, Download, sende Byte, 
empfange Byte. Am Ende des Programms 
befindet sich eine Tabelle, die alle Steuer- 
codes enthält. Durch Austausch dieser Ta- 
belle können auch andere Steuercodes 
ausgewertet werden, ohne daß das Pro- 
gramm neu assembliert werden muß. Das 
Assembler-Programm wurde auf größt- 
mögliche Universalität ausgelegt. Es ist 
auch ohne weiteres möglich, mit den glei- 
chen Routinen und einem anderen Ap- 
plesoft-Programm ein Mailboxsystem zu 
schreiben. Viel Spaß bei der Datenübertra- 
gung. 


4 Telekommunikarion 94 


DB-MEISTER 


Adreß- und Schemabriefprogramm 


Der DB-Meister ist ein in Assembler 
geschriebenes, ungewöhnlich schnel- 
les, unkompliziertes und zugleich 

„narrensicheres“ Adreß-, Datei- und 

Schemabriefprogramm. 

Der DB-Meister dient zum Anlegen, 

Pflegen, Sortieren, Selektieren und 

Ausdrucken von Dateien aller Art. Als 

Apple-Benutzer wissen Sie, wie lang- 

sam viele Programme dieser Art sind. 

Nicht so der DB-Meister! 

Drei Beispiele: 

— Jeder beliebige von 560-999 Re- 
cords wird nach Indexfeldern in 0,2 
Sekunden gefunden. 

Eine komplette Datendiskette mit 
z.B. 600 Records läßt sich in 1 
Minute nach 3 Feldern sortieren 
und untersortieren. Dabei ist die 
Zeit für Diskettenzugriff bereits mit- 
gerechnet. 

Das Einlesen eines 50 Sektoren 
langen Programm-Moduls dauert 
nur 3,5 Sekunden. 


Technische Daten des DB-Meisters 
Recordlänge bis zu 230 Zeichen 


560 bis 1000 Records pro Daten- 
diskette 


Maximal 25 Felder pro Record 


4 Datentypen (String, Integer, Dezi- 
malzahl, Real) 


Suche nach 3 Indexfeldern — je 4 
Zeichen lang — mit Wildcard-Funk- 
tion 

Sortieren und. Filtern (kumuliertes 
Selektieren) geschieht nach den 
Index-Feldern 


Ausdruck der Dateien als Etiketten, 
Listen und Schemabriefe (mit Fel- 
der- und Tastatureinschüben an be- 
liebigen Stellen des Formbriefes) 


normal kopierbare Programmdisket- 
te, unterteilt in Hauptprogramme 
und diverse Hilfsprogramme 
einsatzfähig auf Apple Ile oder IIc. 
(Achtung: Brief-Modul läuft nicht mit 
Videx-Karte!) 


— 256K RAM-Disks verwendbar 


Gesamtpreis 290,— (2 Disketten + 
gedrucktes Manual) 
U. Stiehl 


c/o Dr. A. Hüthig Verlag 
Postfach 10 28 69 : 6900 Heidelberg 
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TERMINAL 


1999 
1919 
1929 
1921 
1922 
1023 
1924 
1925 
1927 
1939 
1069 
1079 
1089 


19099 
1199 
1195 


111® 
1129 


1139 
119® 
1599 
1519 
1529 
153® 
1549 
1545 
1559 
1569 
1579 
1589 
1599 
1699 
161® 
1629 
1659 
2100 
2105 
2119 
2115 
2129 
2125 
2130 
2209 
2205 
2219 


2215 
2229 
2225 
2240 
2245 


2250 
2255 
2269 
2300 
2305 
2310 
2315 


2329 
2325 
2330 
2400 
2405 
2410 
2415 
2420 
2509 
2505 


2519 
2515 
2529 
2525 
2609 
2601 
2602 


2604 
2696 


.2607 


HIMEM: 8192: GOTO 159® 

CALL DI: PRINT: PRINT 

PRINT "1 — Tempo 

PRINT "3 sichere Daten 
PRINT "5 lösche Daten 
PRINT "7 empfange Daten 
PRINT "9 Sender Echo ES 
PRINT "A -— Voll/Halb duplex 
PRINT "E Programm Ende 
PRINT 

GET FU$:FU = VAL (FU$) 

PRINT : PRINT D$'"PR#"SE: PRINT : PRINT D$"PR#"SC 

ON FU GOSUB 2199, 2200 ,2309,2400,2500,2600,3600, 

2800 ‚2700 

IF ASC (FU$) = 27 THEN 339% 

IF FU$ = "E" THEN END 

IF ASC (FU$) > 96 THEN FU$ = CHR$ ( ASC (FU$) - 32): 
REM Klein -> Groß 

IF ASC (FU$) < 65 OR ASC (FU$) > 96 THEN 1919 

ON ASC (FU$) - 64 GOSUB 3009,3199,1199,1199,1199, 
2999 

GOTO 1P1® 

RETURN : REM Pseudo GOSUB 

H$ = CHR$ (26) + "9" 

I$ = CHR$ (13) + CHR$ (9) 

sc=®% 

SE = 2 

D$ = CHR$ (13) + CHR$ (4): REM DOS 

TI$ = " TERMINAL SIMULATOR AKTIV V:1.3" 

PRINT H$: HOME 

INVERSE : PRINT "TERMINAL SIMULATOR": NORMAL : PRINT 
J=1 

FOR I = J T06 

PRINT : PRINT 

ON I GOSUB 2909,2109,2509,2700,3009 ,2200 

NEXT 

PRINT D$"PR#"SC 

GOTO 1®19 

REM Speed 

PRINT "SPEED ZUR ZEIT = "SP 

PRINT "SPEED ( 1-1920® 2-1200 3-39) "; 
PRINT SP$ 

SP = VAL (SP$): IF SP < 1 OR SP > 3 THEN 2119 
PRINT D$"PR#"SE: PRINT I$"T"SP - 1: PRINT D$"PR#"SC 
RETURN 

REM Screen Slot 

PRINT "SCREEN ZUR ZEIT = "SC 

PRINT "SCREEN = SLOT ® ODER 3 ";: 
SC = VAL (SC$) 

PRINT SC$ 

IF SC < > ® AND SC < > 3 THEN 2219 
IF SC = ® THEN PRINT : PRINT CHR$ (26)'"1": PRINT 
PRINT D$"PR#"SC: PRINT D$"IN#"SC 

IF SC = ® THEN POKE 0H,253: POKE OL,249: GOTO 2268: 
REM JSR $FDF® 

POKE OL,®7 

POKE OH, 12 * 16 + SC 

GOTO 2409 

REM Puffer schreiben 

GOSUB 999% 

A$ = "52599" 

L = 1 + PEEK (BH) * 256 + PEEK (BL) - 

(2 x A096 + 5 * 256) 

L$ = STR$ (L) 

GOSUB 9966 

GOTO 2515 

REM Bildschirm löschen 

PRINT H$: HOME 

PRINT TI$ 

PRINT "-------------—- ------------------ -- —— 
RETURN 

REM Puffer löschen 

PRINT "SICHER OB PUFFER GELÖSCHT WIRD?";: 
GET FU$: PRINT FU$ 

IF FU$ = "N" OR FU$ = "n" THEN RETURN 

POKE BL,®: POKE BH,37 

INVERSE : PRINT "PUFFER AUF ®": NORMAL 
RETURN 

REM sende Datei 

POP : REM wegen ON ERR GOTO 

IF DO = 2 THEN PRINT D$;"PR#";SE: PRINT I$;'"TD": 
PRINT D$;"PR#";SC 

GOSUB 999: REM Input Name 

N1$ = N$:N$ = "TEST": GOSUB 9949: GOSUB 9972 

N$ = N1$ 


Bildschirm" 
lösche Schirm" 
sende Text" 
Test sendung" 
Eingabe Text" 
Catalog Disk" 
Neu Initial." 


: GET SP$ 


GET SC$: 


2608 
2619 
2612 
2614 
2616 


2618 


2629 
2622 
2624 
2639 
2659 


2652 


2654 
2656 
2658 
2669 
2662 


2664 
2666 


2668 


2689 
2682 


2684 
2686 
2699 
2692 
2694 
2799 
2705 
2710 
2715 
2728 
2725 
2730 
2735 


2749 
2745 
2759 
2800 
2805 
2815 
2829 
2825 
2839 
2835 
2849 
2845 
2847 
2999 
2992 
2904 
2906 
2908 


2919 
2912 
2913 
2914 
2915 
2916 
2929 
2922 
2924 
2926 
2928 
2939 
2932 
2934 
2936 
2937 
2938 
3009 
3005 
301® 
3015 
3029 
3025 


ONERR GOTO 265% 

GOSUB 9069: REM Datei lesen 

ONERR GOTO 2689 

CALL UP(DO) 

PRINT CHR$ (13);: IF PEEK (ER) = ® THEN 

PRINT CHR$ (2): REM STX 

IF PEEK (ER) < > ® GOTO 2689: 

REM STX nicht angenommen 

GOSUB 9680: REM LINE INPUT 

FOR I = 1 TO LEN (LI$): PRINT MID$ (LI$,I,1l); 

IF PEEK (ER) = ® THEN NEXT : GOTO 2629 

GOTO 2689: REM Datei Ende 

PRINT "Kein Textfile gefunden! Empfangspuffer wird 
überschrieben. Vorher sichern? "; 

GET FU$: IF FU$ = "Y" OR FU$ = "y" OR FU$ = "J" OR 
FU$ = "j" THEN PRINT FU$:N1$ = N$:S1 = S:Dl =D: 
GOSUB 2300:N$ = N1$:D = D1:S = Sl: GOTO 2656 

IF FU$ < > "N" AND FU$ < > '"n" THEN GOTO 2652 
PRINT : ONERR GOTO 266 

A$ = "$2500": GOSUB 99069: GOTO 2662: REM Bin LOAD 
PRINT "DATEI FEHLER CODE:"; PEEK (222): GOTO 2699 
L = PEEK (43617) * 256 + PEEK (43616) + 9472: 

REM Datei-Länge 

CALL UP(DO) 

PRINT CHR$ (13);: IF PEEK (ER) = ® THEN 

PRINT CHR$ (2): REM STX 

FOR I = 9472 TO L: PRINT CHR$ ( PEEK (I));: 

IF PEEK (ER) = ® THEN NEXT 

E = PEEK (ER) 

PRINT CHR$ (13);: IF PEEK (ER) = ® THEN 

PRINT CHR$ (3): REM ETX 

POKE ER,E 

CALL UE 

POKE 216,9:D$ = CHR$ (13) + CHR$ (4): GOSUB 9946 
IF DO = 2 THEN GOSUB 3945 

GOTO 1@1®: END 

PRINT "ECHO ZUR ZEIT "; 

IF MC = 2 THEN PRINT "AKTIV" 

IF MC = 1 THEN PRINT "AUS" 
PRINT "AKTIVIEREN = J ";: 
PRINT FU$ 

IF FU$ = "N" OR FU$ = "n" THEN MC = 1: GOTO 2735 

Me =2 

PRINT D$'"PR#"SE: IF MC = 1 THEN PRINT I$"O": 

POKE EC,®: REM COUT off 

IF MC = 2 THEN PRINT I$'"C": POKE EC,128: REM COUT on 
PRINT D$'"PR#'"SC 

RETURN 

REM Testsendung 

IF DO = 2 THEN PRINT D$;"PR#";SE: PRINT I$;"TD" 
CALL UP(DO) 

PRINT : IF PEEK (ER) < > ® THEN GOTO 2849 

FOR I = 32 TO 127: PRINT CHR$ (I); 

IF PEEK (ER) < > ® THEN GOTO 2840 

NEXT : PRINT 

CALL UE 

IF DO = 2 THEN GOSUB 3945 

RETURN 

REM INIT 

IF DI = ® THEN DIM UP(2),DO(2) 

PRINT D$"PR#"SE: PRINT I$'"U9Y9N": PRINT D$"PR#"SC 

DI = 2 x 4096: REM Dialog Entry 

IF UP(1l) = ® AND PEEK (DI) = 76 AND 
PEEK (DI + 3) = 76 AND PEEK (DI + 6) 
PRINT D$'"BLOAD TERMINAL.B,A$2099'" 
UP(1l) = DI + 3: REM UPLOAD Duplex 
DO(1) = DI + 12: REM DOWNLOAD 

UP(2) = DI + 6: REM UPLOAD Simplex 
DO(2) = DI + 15: REM DOWNLOAD 

UE = DI + 9: REM UPLOADend 

TX = DI + 18: REM TRANSMIT 

RX DI + 21: REM RECEIVE 

BL PEEK (DI + 25) * 256 + PEEK (DI 
BH BL+1 

OL PEEK (DI + 27) x» 256 + PEEK (DI 
OH OL +1 

TB DI + 28: REM SENDBYTE 

RB DI + 29: REM EMPFBYTE 

ER = DI + 39: REM ERRORCODE 

EC = DI + 31: REM ECHO CODE 

RETURN 

REM Betriebsart voll/halb DOUPLEX 
PRINT 

PRINT "BETRIEBSART = "; 

IF DO = 1 THEN PRINT "VOLL"; 

IF DO = 2 THEN PRINT "HALB"; 

PRINT DOUPLEX'" 


GET FU$ 


76 GOTO 2912 
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PRINT "VOLL = 1, 
GET FU$:DO = VAL (FU$): IFDO < 10RDO >2 


THEN 3® 
PRINT D 


35 
0 


PRINT D$'"PR#"SE 


IF DO = 1 THEN PRINT I$"TD" 
IF DO = 2 THEN PRINT I$'"TS" 


PRINT D$"PR#"SC 


RETURN 


REM CATALOG Disk 


GOSUB 9 
PRINT H 


PRINT D$'"CATALOG,S"S",D"D 


RETURN 


REM sende String 


PRINT " 


IF LI$ = '"" GOTO 1@1® 
IF DO = 2 THEN PRINT D$;"PR#";SE: PRINT I$;"TD" 


CALL UP 


FOR I = 1 TO LEN (LI$) 
PRINT MID$ (LI$,I,1); 
IF PEEK (ER) < > ® THEN GOTO 3399 


NEXT : 
CALL UE 


IF DO = 2 THEN GOSUB 3945 


GOTO 19 
REM DOW 
CALL DO 


IF PEEK (ER) = ® AND PEEK (TB) 
GOSUB 2309: GOTO 361 


RETURN 


REM Eingabe-Standart 

INPUT "FILENAME ";N$ 

GET S$:S = VAL (S$) 
IF (S< 1) OR (S > 7) THEN 9994 
PRINT S" DRIVE ";: 
D = VAL (DR$): IF (D < 1) OR (D > 2) THEN 
GET DR$: GOTO 901® 


PRINT " 


PRINT D 
REM 


REM Übergabe-Konstanten 


REM 


REM N$ - Dateiname 
REM N1$; N2$; Namen bei Renamefunktion 
REM A$; L$; Anfang und Länge in HEX bei 


BIN-Fun 
REM S 
REM D 
REM V 
REM R 
REM B 
REM OPE 


094 
$: HOME 


TEXT.2WE 


(DO) 


PRINT 


19 
NLOAD 
(DO) 


SLOT Wer 


: RETURN 


ktionen 
— Slot 

- Drive 
— Volume 
— Record 
— Byte 
NS 


HALB = 2"; 


147 THEN 
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TERMINAL.B 


vo o_ıso9 um 


m HH 
m & 


VDVrtbrreHrHrHH 
SO oo NV BOX DD 


N U WW 9 ADD DD DD DND DW 
NPD HSOO IV AU D 


an 


BrRrARARHAHU Ua 0 
PU DH- SOON 


PRINT CHRS (4) ;"OPEN": NS: " ‚S":5;" .D";D;" v";:y 


RETURN 
REM CLO 
PRINT 


PRINT CHR$ (4) ;"CLOSE";N$ 


RETURN 
REM WRI 


PRINT CHR$ (4); "WRITE";N$ 


RETURN 
REM REA 


PRINT CHR$ (4) ;"READ";N$ 


RETURN 
REM Bin 


SE S 


TE S 


DS 


SAVE 


PRINT CHR$ (4) ; "BSAVE":;N$;",Ar;AS;" L";L$;",S"; 
5:# DVD 


RETURN 
REM Bin 


LOAD 


PRINT CHR$ (4) ; "BLOAD" ;N$;",A";A$;",S";S;",D";D 


RETURN 


REM DELETE 


PRINT CHR$ (4) ;"DELETE" ;N$;",S";S;",D";D 


RETURN 


REM LINE INPUT LI$ 
REM LI$ - Übergabe String 
— Zählervariable 


REM LI 
POKE 51 


‚DDP 


CALL 64874 


LI$ = " 
LI = LI 


CHR$ ( PEEK (LI)): 
LI$ = LI$ + CHR$ (13): RETURN 
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":LI = 511 


+ 1: IF PEEK (LI) < > 141 THEN LI$ = LI$ + 





KR TTTTEI KFH 


* 


* TERMINAL.B von A. Lecreux 1985 


* 


KR E H 


DATEN EQU 
STATUS EQU 
KBD EQU 
KBDSTB EQU 
SEROUT EQU 
SERIN EQU 
COUT EQU 
PRBYTE EQU 
DOSIO EQU 
MEMH EQU 
MEML EQU 
TDI EQU 
TUPL EQU 
TOUT EQU 


ORG 


JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 
JMP 


DA 
DA 


TXBYTE 
RXBYTE 


ERRBYTE 
* 


* 


ECHOFLAG 


COUT® JMP 
OUT1 EQU 
OUT2 EQU 


STATE DFB 


$c085+$29 


DATEN-1 
$cppB 
KBD+$1® 
$0297 
$c295 
$FDED 
$FDDA 
$3EA 
$25 

$9 

$1 

$5 

$29 


$2009 


DIMODE 
UPDOUP 
UPLOAD 
ENDUP 
DOWNLOAD 
DOWNS 
TXMODE 
RXMODE 


BUFFER 
OUT1 


d 
v 


COUT+3 
*-2 
*-l 


® 


* B=Basic, L=DOWNLOAD, 
* D=DIALOG, S=Puffer sichern, 


‚Slot 2 seriell 
‚Status seriell 
‚Tastatur 
‚Strobe 

;OQutput Slot 2 
Input S1ot: 2 
;OQutput 49 Zei. 


‚Memory H.Byte 
‚Memory L.Byte 
‚TIMEOUT Dialog 
;Time UPLOAD Echo 
‚TIMEOUT normal 


‚Dialog 

‚UPLOAD Duplex 
;UPLOAD Simplex 
‚Ende UPLOAD 
;DOWNLOAD Duplex 
‚DOWNLOAD Simplex 
‚sende Byte 
‚empfange Byte 


‚Puffer-Adresse 
;Output Screen 


‚Puffer 
;1-ESC 
;2-CAN 
;3-TIMEOUT 


‚Bildschirm Echo 


;‚Progr.-Status 


U=UPLOAD, 


KRRKKKFRHRKTERTFR KH HEHE EI 


* 


* DIALOG-MODUS 


* 


KERRKRRRTEKKTKTT TEE I KK 


DIMODE LDA 
STA 


LDA 
JSR 


JSR 
LDA 
BPL 
BIT 
CMP 
BEQ 
CMP 
BEQ 
LDX 
STX 
JSR 
LDA 
BEQ 
JSR 
JSR 
JMP 


JSR 
JMP 


#'!nD' 
STATE 


GOON 
TXMODE 


RECEIVE 
KBD 
START 
KBDSTB 
#$9B 
BASIC 
+$82 
BUFF® 
#0 
RXBYTE 
TXMODE 
RXBYTE 
START 
STORE 
RCBA 
START 


BUFF 
START 





‚DIALOG 


‚sende Ctr1l-Q 


;keine Taste 
;‚ESC? 


‚Ctr1-B? 
‚Puffer anzeigen 


‚sende Taste 
‚etwas empfangen 
‚nein 

‚speichern 
;Puffer-Test 


37 


#'B' ;Basic Ende i +$8D 
STATE . COUT ‚incl. RTS 
WAIT 
TXMODE : MSGl $8D 

'* PUFFER ZUR ZEIT: ' 
20 5A 55 


STORE $8D ;STA $250® 54 3A 29 


BUFFER MEML , MEMH 
BUFFER 
TESTBUF 
BUFFER+1 


TESTBUF BUFFER+1 KR KK EEE 


* 

* UPLOAD-MODUS 

* 

RR 


RECEIVE STATUS 
RXREADY 
RETURN ‚nichts empfangen 
SERIN ‚lies Byte 
RXMODE 
DATEN 
#$7F 
LF 
RC99 ;kein LF 
LBYTE ‚davor CR 
CR 
RC98 ‚nein 
LF 
LBYTE 


UPLOAD LDA #TXMODE ‚neuer Vektor 
STA $36 
LDA #+#TXMODE/256 
STA $37 
LDA #'U' ; UPLOAD 
STA STATE 
JMP DOSIO 


UPDOUP LDA #UPDOUP1 ‚neuer Vektor 
STA $36 
LDA #UPDOUP1/256 
STA $37 
JMP UPL® 


LF 
LBYTE 
+$80 


UPDOUPl JSR TXMODE 
BCS BACK 
LDA #TUPL ; TIMEOUT 
STA TIME2 
JSR RXMODE ‚Echo empf. 
BCS BACK2 
LDA TXBYTE 
CMP RXBYTE ;korrekt? 
BEQ BACK3 ‚richtig 
219 LDA +#TDI 
211 TIME2 
ale RXMODE ‚wegen SYN 2x 
213 TXBYTE 
214 RXBYTE 
215 BACK3 
216 
217 BS ‚Korrektur 
218 UPDOUP1 ‚senden 
219 TXMODE 
220 BACK® 
221 
222 UPDOUP1 
223 
224 
225 
226 
227 ERRBYTE 
228 COUT® 
229 TXBYTE 
239 
231 
232 OUT1 ‚alten Vektor 
233 $36 
234 OUT2 
235 $37 
236 DOSIO 
237 #9 
238 ENDUP1 ENDUP3,X ;Text ausgeben 
239 ENDUP2 
240 +$89 
241 COUT 
242 
243 ENDUP1 
244 ENDUP2 ERRBYTE 
245 PRBYTE 
246 #'B' 
247 STATE 
248 +$8D 
249 COUT 
259 
251 ENDUP3 13 
ac 252 'UPLOAD BEENDET CODE: ' 
44 20 42 45 45 4E 
54 20 43 AF 44 45 


COUT 


123 STORE 
124 +$95 
125 BUFFH ‚Puffer zu groß 
126 +$96 
127 LOOP2A 
128 RETURN 
129 
138 BUFFH BUFF 
131 #9 
132 RXBYTE 
133 WAIT ‚sende Ctrl-S 
134 TXMODE 
135 LOOP2-2 
136 RXBYTE 
137 STORE ‚noch etwas empfangen 
138 #TDI 
139 TIME2 
149 RXMODE ‚enpfange 
14] STORE ‚etwas empfangen 
142 
143 LOOPZA +9 ‚Ende DIALOG 
144 LOOP2 MSG2,X 
145 #9 
146 LOOP2ZE 
147 +$80 
148 COUT 
149 
159 LOOP2 
151 LOOP2ZE 
152 
153 ‚sichern 
154 
155 ‚nach Basic 
156 
157 MSG2 $8D, $87 
42 158 '* PUFFER ZU GROSS x' 
46 45 52 20 5A 55 
52 4F 53 53 29 2A 
0 159 $87,$8D,® 
169 
161 +9 ;Puffer Ausdruck 
162 MSG1,X 
163 +0 
164 LOOPI1E 
165 +$80 
166 COUT 
167 
168 LOOP1 
169 LOOPIE BUFFER+1 
179 PRBYTE 
171 BUFFER 
172 PRBYTE 


253 
254 
255 
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Ber 
* 

* DOWNLOAD-MODUS 

* 
RR 


DOWNLOAD JSR DW® ‚starte 
BCS DOWNS2 
DOWN1 JSR DWl 
BCS DOWNS2 
LDA RXBYTE 
PHA 
JSR COUT 
PLA 
JMP DOWNI 


‚empf. & speich. 


‚sende Echo 


JSR DW® ‚starte 

BCS DOWNS2 

JSR DW1 ‚empf. & speich. 

BCS DOWNS2 
DOWNS1 LDA RXBYTE 

JSR COUT 

JSR DW2 

BCC DOWNS1 
DOWNS2 JMP ENDW 


‚Schleife Start 


DWCAN LDA #$22 
STA ERRBYTE 
SEC 
RTS 


DEC BUFFER 
BPL DWBS® 
LDA BUFFER 
CMP #$FF ‚Überlauf 
BNE DWBS® ‚nein 

LDA BUFFER+1 

CMP #MEMH ‚Puffer 
BEQ DWBS1 ‚ja 

DEC. BUFFER+1 

GLC 

RTS 


;Puffer - 1 


EQU x ;Puffer 


LDA #MEML 
STA BUFFER 
LDA #MEMH 
STA BUFFER+1 
RTS 


‚Reset Counter 


LDA #'L' ; DOWNLOAD 
STA STATE 
LDA GOON ‚sende Start 
JSR TXMODE 

DW4 

#$0D ;-CR- 


TXMODE ‚sende Echo 
DW4 

#+TOUT 

TIME2 

RXMODE 

DW4 ‚Error 

#$7F 

CAN 

DWCAN ;Abbruch 

ETX 

DW3 ‚Text Ende 
EOT 

DW3 ‚Übertragung Ende 
ETB 

DW3 ‚Übertragung Ende 
BS 

DWBS ;Korrektur 
STX® 

DWNEW ‚Start Übertr. 
SOH 

DWNEW ;Start Übertr. 


LF 
;kein LF 
‚davor CR 


‚nein 
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ENDW3 


20 42 45 
20 43 4F 


DFB 


+9 
ENDW3,X 
ENDW2 
+$80 
COUT 


ENDW1 
ERRBYTE 
PRBYTE 
+'B' 
STATE 
+$8D 
COUT 
BUFF 


13 
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;Puffer zu groß 


‚Text ausgeben 


‚Basic Ende 


‚Puffer anzeigen 


'DOWNLOAD BEENDET CODE: ' 


Ö 


KERKFKRTTRTTTRTT TI 


* 
* 
* 


TRANSMIT-MODUS 


KRRRKEKERERTETTEREK TEE EI FH 


TXMODE 


ORA 
STA 
LDA 
STA 
STA 
STA 


LDA 
BIT 
BEQ 
JSR 
LDA 
AND 
CMP 
BEQ 
CMP 
BNE 
LDA 
BNE 


ORA 
STA 
JSR 


BIT 
BPL 
BIT 
LDA 
CMP 
BNE 
LDA 
STA 
SEC 
RTS 


LDA 
BIT 
BEQ 
LDA 
AND 
JSR 
STA 


+$89 
TXBYTE 
+ 
TIME® 
TIMEl 
ERRBYTE 


STATUS 
RXREADY 
TM2 
SERIN 
DATEN 
#$7F 
WAIT 
WAITSUB 
CAN 
NOUT 
+$82 
TM3 


+$89 
RXBYTE 
COUT9 


KBD 

TM® 
KBDSTB 
KBD 

+27 

TM® 
+$81 
ERRBYTE 
ABBRUCH 


STATUS 
TXREADY 
TMl 
TXBYTE 
#$7F 
SEROUT 
DATEN 


‚rette Byte 


‚empfangen 


‚lies Byte 


‚warten 


‚Abbruch 


REEL ER FER 


‚Taste gedrückt 


‚Sender leer 
;hole Byte 


‚sende Byte 
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ECHOFLAG 
TMö1 ‚nein i ;UPLOAD? 
+$89 i ;keine Anzeige 


‚alles ok 


WAITSUB 
STA TIME® 
STA TIMELl 
STA ERRBYTE 
LDA #TOUT : ; TIMEOUT 
STA TIME2 


LDA STATUS 
BIT RXREADY ‚empfangen 23EF: @1 RXREADY 
BEQ WS1 235Fd: 92 TXREADY 
JSR SERIN ‚lies Byte 23Fl: 99 TIME® 
LDA DATEN 23F2: 90 TIMELl 
AND #$7F 23F3: 9 TIME2 
CMP GOON ‚weiter 23F4: 9 TIME3 
BEQ TM® 23F5: 99 LBYTE 
CMP CAN ;Abbruch 
BNE NOUT 23F6: ®Bd CTRL 
LDA #$42 23F7: @l SOH 
BNE WS2 ‚merke Byte 23F8: 82 STX® 
23F9: 93 ETX 
BIT KBD ‚Taste gedrückt 23FA: 94 EOT 
BPL WS3 23FB: 85 ENQ 
BIT KBDSTB 23FC: 96 ACK 
LDA KBD 23FD: 97 BEL 
CMP_ #27 ;ESC? 23FE: 98 BS 8,9 
BNE WS3 2400: DA LF 10,11,12 
LDA #$41 2403: ®D 549 CR 13 
STA ERRBYTE ‚merke 2404: ÖE 550 SO 14 
SEC ;Abbruch 2405: QF 5561 SI 15..16 
RTS 2407: 11 552 17,18 
2409: 13 553 19,20 
INC TIME® 240B: 15 554 21 
BNE WS® 240C: 16 555 22 
INC TIMEl 240D: 17 556 23 
BNE WSP® ZADdE: 18 19 1A 557 24,25,26,27,28,29,30,31 
DEC TIME2 24ll: 1B 1C 1D lE IF s 
BNE WS = 
re 1046 Bytes 
BNE WS2 ‚ TIMEOUT 


; STATUS 


: Time-Count 


So 9 989 Dr 


‚letztes Byte 


IVO PN DH a 


a nn 22 2 22 
* 

* RECEIVE-MODUS 

* 

er 


RXMODE EQU x 
LDA #9 
STA TIME® 
STA TIMEIl 
STA ERRBYTE 
LDA TIME2 
STA TIME3 ;‚TIMEOUT retten 


LDA STATUS 

BIT RXREADY ‚Byte da 
BEQ RMIl 

JSR SERIN ‚lies Byte 
LDA DATEN 

STA LBYTE 

ORA #$89 

STA RXBYTE 


cc 08 Der nächste Peeker 
ns, nn Heft 5 / 1985 


BIT KBDSTB 
LDA KBD 


m oe erscheint am 


#1 


ERRBYTE ;Abbruch Code 
;Fehler u" = 


;Ctrl1-B 
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In diesem zweiten Teil vermitteln wir das systematische 
Grundgerüst der Befehle, Parameter und Dateitypen des Pro- 
DOS-BASIC.SYSTENMss. Falls Sie Apple-Neuling sind und des- 
halb das alte DOS 3.3 nicht kennen, so werden Sie einiges 
zunächst nicht verstehen. Lassen Sie sich jedoch dadurch 


nicht entmutigen, denn diese Folge ist zum späteren Nach- 
schlagen sowie als Gesamtüberblick gedacht. In den nachfol- 
genden Teilen unserer ProDOS-Serie wird jeder Befehl detail- 
liert mit vereinfachten Beispielprogrammen erläutert. 





Teil 2: Das definitorische Grundgerüst 


1. BEFEHLSTYPEN 


Befehle an das BASIC.SYSTEM bestehen 
aus Befehlsnamen, die wie unter DOS 3.3 
in zwei Formen erteilt werden können: 


Direkte Befehle (Nicht-RUN-Modus): 
Diese können über die Tastatur eingege- 
ben werden. Vor dem Befehl muß implizit 
und nach dem Befehl explizit ein Return 
(Rtn, Ctrl-M) stehen, z.B. 

(Rtn implizit) 

CATALOG Rtn 

Das Return vor dem Befehl gilt immer 
dann als implizit vorhanden, wenn der 
Cursor nach dem Prompt-Zeichen „U“ am 


linken Bildschirmrand blinkt. Führende 
Leertasten wären erlaubt, z.B. 

CATALOG 
Dagegen sind andere Zeichen nicht zuläs- 
si0.2B, 
:CATALOG 


Schließlich sind auch mehrere BASIC.SY- 
STEM-Befehle innerhalb derselben Einga- 
bezeile nicht möglich, z.B. 

CATALOG: CATALOG 


Indirekte Befehle (RUN-Modus): 

Diese werden während des laufenden, 
nicht-compilierten Applesoft-Programms 
an das BASIC.SYSTEM erteilt. Man be- 
achte also, daß im Gegensatz zu DOS 3.3 
kein Integer-Basic-, kein compiliertes Ap- 
plesoft- und auch kein Assembler-Pro- 
gramm als RUN-Modus gilt. Dem Befehl, 
der im RUN-Modus in Anführungszeichen 
gesetzt wird, geht (normalerweise) ein im- 
plizites Return sowie auf alle Fälle stets ein 
Ctrl-D = CHR$ (4) voraus. Ferner muß der 
Befehl durch ein explizites Return abge- 
schlossen werden, z.B. 

10 PRINT: PRINT CHR$ (4) "CATALOG" 
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Das Ctrl-D muß das erste Zeichen einer 
PRINT-Anweisung sein, die ihrerseits ent- 
weder unmittelbar der Zeilennummer oder 
unmittelbar dem Doppelpunkt (Statement- 
Separator) folgen muß. Mehrfach-Befehle 
in derselben Programmzeile sind zulässig, 
z.B, 
10 PRINT CHR$ (4) “CAT“: PRINT CHR$ 
(4) "CAT" 
Der Befehl in Anführungszeichen kann 
durch eine String-Variable ersetzt werden, 
z.B. 
10X$ = CHR$ (4) + "CAT" 
20 PRINT X$ 
Im Gegensatz zu DOS 3.3 befindet sich 
das BASIC.SYSTEM stets im sog. nicht- 
sichtbaren Pseudo-Trace-Modus, der 
nach jeder neuen Zeilennummer sowie 
nach jedem Doppelpunkt wirksam wird. 
Deshalb sind einige syntaktische Feinhei- 
ten gegenüber DOS 3.3 zu beachten: 


Beispiel 1: 

10X$ = CHR$ (4) + "CATALOG" 

20 PRINT "AAA“;: PRINT X$ 

Hier wird der CATALOG-Befehl ausge- 
führt, obwohl nach „AAA” ein Semikolon 
folgt und somit kein implizites Return vor- 
angeht. Grund: PRINT X$ steht nach ei- 
nem Doppelpunkt. Bei DOS 3.3 würde 
demgegenüber nur „AAACATALOG“ am 
Bildschirm angezeigt und somit der CATA- 
LOG-Befehl ignoriert. 


Beispiel 2: 

10X$ = CHR$ (4) + "CATALOG" 

20 YS = ",D1" 

30 PRINT X$; Y$: REM richtig 

40 PRINT X$;: PRINT Y$: REM falsch 
Hier sind Befehlsname und Parameter ge- 
trennte Strings. Werden diese wie in Zeile 
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ProDOS für Anfänger ....... 


30 als ein einziger PRINT-Befehl ausge- 
führt, dann ist das BASIC.SYSTEM „zu- 
frieden“. Erfolgt indessen eine Aufsplit- 
tung wie in Zeile 40, so führt dies zu einem 
Syntax-Error. Unter DOS 3.3 wäre demge- 
genüber eine Aufteilung zulässig. 


Beispiel 3: 

10 R$ = CHR$ (13): REM Ctrl-M 

20 C$ = CHR$ (4) + "CATALOG" 

30 PRINT R$: PRINT C$ 

40 PRINT R$; C$ 

Hier wird zusätzlich ein nacktes Return als 
String-Variable definiert. In Zeile 30 wäre 
das BASIC.SYSTEM „zufrieden“ (im Ge- 
gensatz zu der falschen Angabe in dem 
englischen ProDOS-Handbuch der Firma 
Apple). In Zeile 40 hingegen würde eine 
Fehlermeldung entstehen, weil nunmehr 
Ctrl-D nicht mehr das erste Zeichen der 
Zeichenkette wäre. Unter DOS 3.3 würde 
Zeile 40 fehlerfrei ausgeführt. 


Als Fazit halten wir fest, daß ein indirekter 
BASIC.SYSTEM-Befehl nur dann korrekt 
ausgeführt wird, wenn das Otrl-D das erste 
Zeichen der PRINT-Anweisung ist und 
wenn diese bis zum nächsten Statement- 
Separator („:“ oder $00 als End of Line) 
komplett gePRINTet wird und nicht durch 
ein Semikolon, das das Return unterdrük- 
ken würde, abgeschlossen wird. Ferner 
sei darauf hingewiesen, daß das Ctrl-D 
wahlweise als CHR$ (4) mit Bit 7 off oder 
als CHR$ (132) mit Bit 7 on (4 + 128 = 
132) definiert werden könnte. 


Die Textdatei-Befehle OPEN, READ, 
WRITE, POSITION und APPEND sind üb- 
rigens reine Indirekt-Befehle, während alle 
anderen Befehle sowohl im RUN- wie 


41 





auch im Nicht-RUN-Modus an das BASIC- 
‚SYSTEM erteilt werden können. 


Im BASIC.SYSTEM sind folgende Befehle 
implementiert worden: 


Allgemeine Befehle 

CAT: Anzeige des Catalogs in 40 Z/Z 
CATALOG: Anzeige des Catalogs in 80 Z/Z 
PREFIX: Definition des Default-Directory 
CREATE: Anlage einer neuen Datei 
RENAME: Umbenennung einer Datei 
VERIFY: Dateiname prüfen 

DELETE: Datei löschen 

LOCK: Dateiname mit Sternchen verse- 
hen (Schreibschutz) 

UNLOCK: Sternchen entfernen 

PR#: Änderung der Ausgabe-Vektoren 
IN#: Änderung der Eingabe-Vektoren 
BYE (Reboot bei ProDOS 1.1.1) 


Applesoft-Befehle 

RUN: Starten eines Applesoft-Programms 
LOAD: Laden eines Applesoft-Programms 
SAVE: Speichern eines Applesoft-Pro- 
gramms 

CHAIN: Starten eines Applesoft-Moduls 
STORE: Speichern aller Applesoft-Varia- 
blen 

RESTORE: Laden aller Applesoft-Varia- 
blen 


Textdatei-Befehle 

OPEN: Öffnen einer Textdatei 

READ: Lesen von einer Textdatei 
WRITE: Schreiben auf eine Textdatei 
APPEND: Textdatei erweitern 
POSITION: Textdatei-Feldzeiger ändern 
CLOSE: Schließen einer Textdatei 
FLUSH: Puffer auf Textdatei übertragen 
FRE: String-Garbage-Collection 

EXEC: Textbefehlsdatei starten 


Binärdatei-Befehle 

BRUN: Maschinenprogramm starten 
BLOAD: (Binär)datei laden 

BSAVE: (Binär)datei speichern 


Allgemeiner Start-Befehl 
-: Ersatz für RUN, BRUN, EXEC 


Diejenigen, die unter DOS 3.3 program- 
miert haben, werden bemerken, daß die 
Befehle FP, INT, MON, NOMON, MAX- 
FILES und INIT fehlen. FP und INT mußten 
entfallen, weil das BASIC.SYSTEM nur für 
Applesoft und nicht für Integer-Basic ge- 
dacht ist. MON und NOMON fehlen wahr- 
scheinlich aus Platzgründen. Dasselbe gilt 
für den INIT-Befehl. MAXFILES ist nicht 
mehr möglich, weil mit dynamischen I/O- 
Puffern gearbeitet wird. 

Dafür gibt es einige völlig neue Befehle, 
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nämlich CAT, CREATE, FLUSH, PREFIX, 
STORE, RESTORE und FRE. Darüber hin- 
aus wurden die meisten gleichnamigen 
DOS-Befehle unter ProDOS funktionell 
erweitert und verbessert. 


2. PARAMETERTYPEN 


Die Parameter sind Zusätze zu den Be- 
fehlsnamen. Sie bestehen aus dem Para- 
meter-Buchstaben und dem Parameter- 
Wert und werden durch Kommas getrennt, 
wobei bei mehreren Befehlsparametern 
deren Reihenfolge beliebig ist, z.B. CATA- 
LOG, S6, D2 oder CATALOG, D2, S6. 

Es gibt zwei Ausnahmen: 

a) Namen werden durch Schrägstriche ge- 
trennt, z.B. CAT/DISK/DEMOS. 

b) Der Parameter-Wert für die Slot-Num- 
mer wird bei den PR#/IN#-Befehlen di- 
rekt an das Nummernkreuz angehängt, 
z.B. PR#1 


/n: Name (max. 64 Zeichen) 

s: Slot bei PR#s, IN#s (1-7) 

‚Ss: Slot (1-7) 

‚Dad: Drive (1-2) 

‚Aa: Anfangsadresse ($0000-$BFFF) 
‚Ee: Endadresse ($0000-$BFFF) 

‚LI: Länge ($0001-$C000) 

‚Bb: Byte-Offset ($000000-$FFFFFF) 
‚Rr: Recordnummer (0-16777215) 
‚Ff: Feldnummer (0-65535) 
‚Sz:Zeilennummer (0-63999) 

‚Tt: Dateityp (3-Buchstaben-Kürzel) 


Beispiele 
CATALOG/VOLUMEJBRIEFE 
PR#3 

CAT, S3, D2 

BSAVE BILDER, A$2000, E$5FFF 
BSAVE BILDER, A$2000, L$4000 
BLOAD BILDER, A$4000, B$2000 
PRINT CHR$ (4) “"READ FILE, R1000“ 
PRINT CHR$ (4) “"READ FILE, F3“ 
LOAD PROGRAMM, 82000 
BLOAD/VOLUME, A$1000, TDIR 


3. DATEITYPEN 


Wie bereits im ersten Teil der Serie er- 
wähnt wurde, kann ein ProDOS-Datenträ- 
ger (Diskette, Festplatte) im Rahmen der 
maximalen Speicherkapazität von 32M be- 
liebig viele Dateien umfassen, wobei eine 
einzelne Datei bis zu 16M groß sein kann. 
Die ProDOS-Dateitypen lassen sich in drei 
Gruppen einteilen: 


SOS-Dateitypen: Dies waren die Dateity- 
pen des „Sophisticated Operating Sy- 
stem“ des Apple Ill, die inzwischen keine 


Rolle mehr spielen, da der Apple III nicht 
mehr produziert wird. 

Selbstdefinierte Dateitypen: Ein Anwen- 
derprogramm könnte sich seine eigenen 
Dateitypen mit den Typ-Nummern im Be- 
reich $F1 bis $F8 definieren. Ein Bedarf 
hierfür besteht jedoch normalerweise 
nicht. 

Standard-Dateitypen: Dies sind die nor- 
malen oder allgemeinen Dateitypen, und 
zwar u.a.: 


SYS: Systemprogramm 


TXT: Textdatei 

BIN: Binärdatei 

BAS: Applesoft-Programm 
VAR: Applesoft-Variablendatei 
DIR: Subdirectory 


Der Dateityp besteht aus dem Parameter 
„I“ und dem jeweiligen 3-Buchstaben- 
Kürzel, z.B. TSYS, TTXT, TBIN, TBAS, 


" TVAR, TDIR usw. 


SYS-Dateien umfassen neben PRODOS 
und BASIC.SYSTEM weitere mögliche 
Systemprogramme, z.B. FILER, CON- 
VERT u.a. SYS-Dateien werden mit 
BLOAD SYSTEMDATEI, TSYS, A$2000 
geladen und mit 

—SYSTEMDATEI oder 

BRUN SYSTEMDATEI, A$2000, TSYS 
gestartet. 


TXT-Dateien sind normale ASCIlI-Datei- 
en. Falls diese mit den BASIC.SYSTEM- 
Befehlen OPEN, WRITE, READ, APPEND, 
POSITION, FLUSH und CLOSE bearbeitet 
werden, ist bei jedem ASCIlI-Zeichen das 
Bit 7 auf O gesetzt, also z.B. $0D statt $8D 
für Return. Unter DOS 3.3 war es genau 
umgekehrt. Programmtechnisch können 
TXT-Dateien sequentielle oder Random- 
Dateien sein. 


BIN-Dateien sind Binärdateien aller Art, 
z.B. Maschinenprogramme, Hires-Bilder 
usw. Im Gegensatz zu DOS 3.3 steht die 
Startadresse und Länge einer BIN-Datei 
nicht im ersten Dateiblock, sondern im 
Catalog-Dateieintrag. Auf BIN-Dateien 
kann ohne den TBIN-Zusatz mit BSAVE, 
BLOAD und BRUN zugegriffen werden. 
Doch sind die BLOAD/BSAVE-Befehle im 
BASIC.SYSTEM dergestalt generalisiert 
worden, daß jede andere Dateiart mit dem 
entsprechenden Typzusatz geladen und 
gespeichert werden kann, z.B. 

BLOAD TEXTFILE, TTXT, A$1000 
BLOAD BASICPROGRAMM, TBAS, 
A$0801 
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Directories (Volume-Directory und Subdi- 
rectories) können ebenfalls mit BLOAD 
geladen, nicht jedoch (aus Sicher- 
heitsgründen) mit BSAVE zurückgespei- 
chert werden: 

BLOAD/VOLUMEDIR, A$2000, TDIR 
BLOAD/VOLUMEDIR/SUBDIR, A$1000, 
TDIR 


BAS-Dateien sind Applesoft-Programme, 
auf die mit den Befehlen SAVE, LOAD, 
RUN und CHAIN zugegriffen wird. Im Ge- 
gensatz zu DOS 3.3 steht die Länge des 
Applesoft-Programms nicht im ersten Da- 
teiblock, sondern im Catalog-Dateieintrag. 


VAR-Dateien umfassen die Namen und 
Werte aller Variablen eines Applesoft-Pro- 
gramms und werden mit STORE/VARIA- 
BLENDATEI gespeichert und mit RE- 
STORE/VARIABLENDATEI geladen. 


DIR-Dateien sind Inhaltsverzeichnisse, 
und zwar entweder das Hauptinhaltsver- 
zeichnis (Volume-Directory) oder eines 
der beliebig vielen Unterinhaltsverzeich- 
nisse (Subdirectories). 


4.CAT, CATALOG, PREFIX, 
CREATE 


CAT/VOLUME/DIR, Ss, Dd 
CATALOG/VOLUME/DIR, Ss, Dd 
PREFIX/VOLUME/DIR, Ss, Dd 
CREATE/VOLUME/DIR,Tt, Ss, Dd 


Nach diesem relativ trockenen, aber not- 
wendigen theoretischen Gesamtüberblick 
können wir uns nunmehr den einzelnen 
Befehlen im Detail zuwenden. Nachdem 
wir die USERS.DISK (oder eine andere 
ungeschützte ProDOS-Diskette) mit 
PR#6 o.ä. gebootet und dann ein ggf. 
vorhandenes Menü verlassen haben, be- 
finden wir uns im Nicht-RUN-Modus, so 
daß wir jetzt über die Tastatur Befehle 
eingeben können. Mit 

CAT 

oder mit 

CATALOG 

können wir uns nunmehr den Catalog oder 
das Directory (Inhaltsverzeichnis) der Dis- 
kette in 40 Zeichen/Zeile (CAT) oder in 80 
Z/Z ansehen. Das Listing „PRODOS.DI- 
RECTORY“ zeigt einen solchen ProDOS- 
Catalog in 80 Z/Z. Betrachten wir hier den 
ersten Dateieintrag „PRODOS“: 


Sternchen: Ein vorangestelltes Sternchen 


zeigt an, daß die Datei „PRODOS“ 
schreibgeschützt ist. Fehlte das Stern- 
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chen, dann könnte die Datei gelöscht 
werden. 

Dateiname: Der Name „PRODOS“ be- 
steht hier aus 6 Großbuchstaben. Insge- 
samt kann eine Dateiname bis zu 15 Zei- 
chen umfassen, und zwar nur Großbuch- 
staben, Ziffern und Punkte, aber keine 
Leerzeichen, Ctrl-Buchstaben, Kleinbuch- 
staben und sonstigen Sonderzeichen. Das 
erste Zeichen des Dateinamens muß ein 
Großbuchstabe sein. Beispiele: 
SPIELPROGRAMM10 (mit Ziffern) 
BASIC.SYSTEM (mit Punkt) 

MEIN PROGRAMM (falsch, da Leertaste) 
BASIC-PROGRAMM (falsch, da Binde- 
strich) 
Dateityp: 
„OYS“ 
Blockanzahl: Anzahl der von der Datei 
belegten Blocks, hier „31“. 

Datum der Modifikation: In der Form TT- 
MON-JJ, hier 1-JAN-84. 

Uhrzeit der Modifikation: In der Form 
HH:MM. 

Datum der Anlage: Tag, an dem die Datei 
erstmals angelegt („kreiert“) wurde, hier 
„<NO DATE>", 

Uhrzeit der Anlage: Diese fehlt hier. 
Dateilänge: Anzahl der Bytes der Datei, 
hier „15360“. ENDFILE = End of File 
steht sowohl für die Gesamtanzahl der 
Bytes wie auch für die absolute Position 
des letzten Bytes der Datei, d.h. „PRO- 
DOS“ umfaßt 15360 Bytes, und das letzte 
Byte dieser Datei ist das 15359ste Byte, da 
die Zählung mit Null beginnt. 

Zusatzinfo: Die Zusatzinformation wird im 
ProDOS-Catalog als SUBTYPE bezeich- 
net, während das technische Manual von 
AUXTYPE (Auxiliary Type) spricht. Bei 
BIN-Dateien steht hier die Startadresse. 
Bei SYS-Dateien usw. bleibt das Feld leer. 


3-Buchstaben-Kürzel, hier 


Unter ProDOS gibt es zwei Arten von In- 
haltsverzeichnisses: 

Volume-Directory: Das Volume-Directo- 
ry ist das Hauptinhaltsverzeichnis. Es be- 
legt auf der Diskette die Blocks 2-5 und 
kann insgesamt 51 Dateieinträge aufneh- 
men (12 im ersten Block und je 13 in den 
drei weiteren Blocks = 12 +3x*13 = 51). 
Für 140K-Disketten ist dies oft ausrei- 
chend. 

Subdirectory: Neben dem einzigen Vol- 
ume-Directory können mit dem CREATE- 
Befehl beliebig viele Subdirectories ange- 
legt werden, wobei jedes Subdirectory im 
übrigen beliebig viele Dateieinträge um- 
fassen kann. Ein Subdirectory ist in dem 
Volume-Directory durch den Dateityp 
„DIR“ gekennzeichnet. Für Subdirecto- 
ries gibt es keine festen Blocks auf der 
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Diskette, d.h. sie können sich überall dort 
befinden, wo auf der Diskette gerade Platz 
ist. Übrigens kann auch das Subdirectory 
selbst wieder Sub-Subdirectories enthal- 
ten (hierarchische Catalog-Struktur), doch 
sollte man diese möglichst vermeiden, 
denn je mehr (verschachtelte) Subdirecto- 
ries, desto länger ist der Diskettenzugriff. 


Unter ProDOS lassen sich drei Arten von 
Namen unterscheiden: 


Volume-Name: Dies ist der beim Forma- 
tieren festgelegte Name der Diskette 
selbst, wie er aus dem Volume-Directory 
ersichtlich ist (bei unserem Listing 
„/STIEML ); 

Subdirectory-Name: Dies ist der Name 
eines von beliebig vielen Subdirectories. 
File-Name: Dies ist der eigentliche Name 
der Datei. 


Die Summe aus „/“ + Volume-Name + 
„/“ + Subdirectory-Name + „/“ + File- 
Name bildet den sog. Pfadnamen (Path- 
name) oder vollständigen Namen, der in- 
kKlusive Schrägstriche maximal 64 Zeichen 
umfassen kann. Die Namensbestandteile 
müssen durch Schrägstriche abgegrenzt 
werden, wobei der Schrägstrich nach dem 
letzten Bestandteil fakultativ ist, also 
CAT/STIEHL/DIR/ 

oder 

CAT/STIEHL/DIR 


Mit dem PREFIX-Befehl kann man das 
Präfix, d.h. den Dateinamenvorspann fest- 
legen. Danach genügt wie bei DOS 3.3 der 
eigentliche Dateiname (ohne Schrägstrich 
als Zusatz zu den Befehlen, also statt z.B. 
LOAD/VOL/SUBDIR/PROGRAMM.XYZ 
zunächst 

PREFIX/VOL/SUBDIR 

und dann nur noch 

LOAD PROGRAMM.XYZ 


Beispiele: 


. NEW 

. 10 HOME 

. CREATE/STIEHL/DIR, TDIR 
. PREFIX/STIEHL/DIR 

. SAVE DEMO 

. CATALOG 

. PREFIX/STIEHL 

. CATALOG 

. PREFIX 


oo oO P@ODPD -— 


1. Mit NEW löschen wird zunächst ein 
möglicherweise noch im Speicher befindli- 
ches Applesoft-Programm. 
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2. Mit 10 HOME legen wir jetzt ein Test- 
programm an. 

3. Mit CREATE/STIEHL/DIR, TDIR erstel- 
len wir jetzt auf der Diskette mit dem Vol- 
ume-Namen STIEHL ein Subdirectory mit 
dem Namen DIR. 

4. Mit PREFIX/STIEHL/DIR legen wir das 
Präfix „/STIEHL/DIR/“ fest. 

5. Der Befehl SAVE DEMO speichert da- 
mit das Testprogramm genauso im Subdi- 
rectory DIR, als hätten wir SAVE/STIEHL/ 
DIR/DEMO gesagt. 

6. Mit CATALOG können wir automatisch 
das Subdirectory DIR ansehen. 

7. Mit PREFIX/STIEHL können wir wieder 
zum Volume-Directory zurückschalten. 

8. Der CATALOG-Befehl zeigt damit wie- 
der das Volume-Directory an. 

9. Der PREFIX-Befehl zeigt jetzt (wieder) 
„/STIEHL/“ an. 


Der PREFIX-Befehl bietet folgende Be- 
sonderheiten: 


PREFIX/VOLUME/SUB legt das neue Prä- 
fix fest. 

PREFIX, S6, DT legt das Volume-Directory 
der Diskette in Slot 6, Drive 1 als neues 
Präfix fest. 

PREFIX oder 10 PRINT CHR$ (4) „PRE- 
FIX“: INPUT P$ zeigt im Nicht-RUN-Mo- 
dus das momentane Präfix an oder weist 
im RUN-Modus bei einem unmittelbar fol- 
genden INPUT der String-Variablen — der 
Name der Variablen ist beliebig — das mo- 
mentane Präfix zu. | 
PREFIX/ entfernt das Präfix insgesamt. 
Danach verhält sich das BASIC.SYSTEM 
wie DOS 3.3, d.h. es können jetzt mit den 
Parametern Ss und Dd die jeweils aktiven 
Slots und Drives (als Default-Werte) be- 
stimmt werden. 


Beispiel: 


1. PREFIX, S6, D1 
2. CAT, D2 

3. CAT 

4. PREFIX/ 

9. CAT, D2 

6. CAT 


1. Zunächst wird der Volume-Name von 
S6, D1 als Präfix festgelegt. 

2. CAT, D2 zeigt den Catalog der Diskette 
in Drive 2 an. 

3. CAT ohne Parameter zeigt jedoch jetzt 
wieder Drive 1 an, da das alte Präfix noch 
gültig ist (Dies weicht von DOS 3.3 ab). 

4. PREFIX/ entfernt jedes Präfix. 

5. CAT, D2 zeigt Catalog von Drive 2 an. 
6. CAT zeigt jetzt erneut Drive 2 an (Dies 
entspricht jetzt DOS 3.3). 
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PRODOS.DIRECTORY 
/STIEHL 
NAME TYPE BLOCKS MODIFIED CREATED ENDFILE SUBTYPE 
12345678901234567899123456789012345678901234567890123456789901234567890 123456789 
1 18 27 31 42 48 59 67 73 
* * * % * * * * * 
*PRODOS SYS 31 1-JAN-84 9:00 <NO DATE> 15369 
#*BASIC.SYSTEM Sys 21 15-NOV-83 9:90 <NO DATE> 10249 
*FILER Sys 5l <NO DATE> <NO DATE> 25699 
*CONVERT Sys 42 1-NOV-83 P:0® <NO DATE> 20481 
*CLEAR BIN l <NO DATE> <NO DATE> 184 A=$0309 
*LOE BIN l <NO DATE> <NO DATE> 111 A=$9299 
*LCREAD BIN l <NO DATE> <NO DATE> 134 A=$0300 
*PEEKER BIN l <NO DATE> <NO DATE> 448 A=$0803 
*BLOCKREADER BIN l <NO DATE> <NO DATE> 312 A=$9803 
*BLOCKTRACER BIN l <NO DATE> <NO DATE> 149 A=$0309 
*STARTUP BAS 1 23-DEC-84 9:00 <NO DATE> 176 
*MACROS BAS 3 23-DEC-84 9:90 23-DEC-84 9:00 882 
*RAMKARTE SET l 21-JUN-84 0:00 <NO DATE> 399 R= 4096 
#*PRODOS.EDITOR BIN 13 1-AUG-84 0:ß® <NO DATE> 5707 A=$3FA5 
*PRODOS . DATUM BIN l 21-JUN-84 0:00 <NO DATE> 267 A=$6009 
*FUSION TAT l 21-JUN-84 09:90 <NO DATE> 326 R= 4096 
*PRODOS.INIT8® BIN 9 <NO DATE> <NO DATE> 4096 A=$8009 
*BLOCK28®PATCH BIN l <NO DATE> <NO DATE> 121 A=$9300 
#RAMSUCHER BIN l 21-JUN-84 9:90 <NO DATE> 222 A=$02F® 
#*BLOCKTRACERL BIN l  2-SEP-84 0:00 2-SEP-84 9:90 147 A=$0300 
*QUICKCOPY BIN 5 <NO DATE> <NO DATE> 1881 A=$ß8AE 
*PRODOS.COPYOBJ BIN 4 <NO DATE> <NO DATE> 1502 A=$ßBB8 
*PRODOS.COPYA BAS 3 <NO DATE> <NO DATE> 650 
*FORMAT.LC.START BAS 1 13-JAN-85 09:00 13-JAN-85 9:00 481 
#*FORMAT.LC BIN 8 <NO DATE> <NO DATE> 3232 A=$80BB 
EINTRAG.ANALYSE BAS 6 13-JAN-85 9:00 <NO DATE> 2112 
CAT.SAVER BAS l <NO DATE> <NO DATE> 345 
CAT.ARRAY BAS l <NO DATE> <NO DATE> 385 
EINTRAG.SUCHER BAS l <NO DATE> <NO DATE> 333 
CAT.SAVE ET 7 <NO DATE> <NO DATE> 2571 R= d 


BLOCKS FREE: 55 


BLOCKS USED: 227 TOTAL BLOCKS: 289 


CAT.ARRAY 


199 
SHHDR 
6HPB1P 
6H029 
EHB3H 
6HBAP 
6HB5P 
EHN6H 
60070 
sHn8n 
69099 
KALB 
6H11P 
60129 
60139 
6B1AP 
60150 
60160 


GOSUB 60099: END 

HOME : REM CAT.ARRAY 

PRINT CHR$ (4) ;"PREFIX": INPUT P$ 

DIM D$(51):D1l = 8:D2 = 51 

PRINT CHR$ (4) ;"OPEN";P$;", TDIR" 

PRINT CHR$ (4) ;"READ";P$ 

INPUT D1$: INPUT D2$: INPUT D3$ 

DI = Dl + 1: IF Dl > D2 THEN 6Pd8h 

INPUT D$(D1): IF D$(DL) < > "" THEN 6Pd6h 

INPUT D3$: PRINT CHR$ (4) ;"CLOSE";P$ 

PRINT "Diskette ";D1$: REM Prefix 

PRINT : PRINT LEFT$ (D2$,39): REM Kopfzeile 

PRINT :D1 =DI -1 

FOR X = 1 TO DI 

IF MID$ (D$(X),18,3) = "BAS" THEN PRINT LEFT$ (D$(X),39) 
NEXT 
PRINT : 
RETURN 


PRINT LEFT$ (D3$,39): REM Fußzeile 


CAT.SAVER 


199 
11® 
129 


HOME : REM CAT.SAVER 
PRINT CHR$ (4) ;"PREFIX": INPUT P$ 
DIM D$(51):D1 = 9:D2 = 51 


130 PRINT CHR$ (4) ;"OPEN";P$;", TDIR" 


148 PRINT CHR$ (4); "READ";P$ 
150 INPUT D1$: INPUT D2$: 
168 D1 =DI +1: 


180 INPUT D3$: PRINT CHR$ (4) ;"CLOSE";P$ 


INPUT D3$ 
IF D1 > D2 THEN 18® 
178 INPUT D$(D1): IF D$(D1) < > "" THEN 16® 


19® PRINT CHR$ (4);"OPEN CAT.SAVE": PRINT CHR$ (4); "WRITE CAT.SAVE" 


200 PRINT D1$ 
210 PRINT : 
228 PRINT :Dl =D1l -1 


PRINT D2$ 


2380 FOR X = 1 TO D1 


24®0 PRINT D$(X) 


250 NEXT 


260 PRINT : 


PRINT D3$ 


278 PRINT CHR$ (4) ;"CLOSE" 
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Default-Werte (Ersatzwerte) 


a) DOS-3.3-Emulation-Default: Wenn wir 
mit PREFIX/ das Präfix ganz entfernen, so 
„weiß“ ProDOS nichts mehr vom Präfix 
und verhält sich hinsichtlich der Slot- 
Drive-Default-Werte wie DOS 3.3: Der zu- 
letzt angesprochene Slot/Drive bleibt so- 
lange aktiv, bis explizit ein neuer Slot/ 
Drive angegeben wird. 

b) ProDOS-Default: Das mit PREFIX/VOL- 
UME.NAME/SUBDIR.NAME definierte 
Default-Präfix bleibt solange erhalten, bis 
es explizit neu definiert wird. Slot- und 
Drive-Parameter bei BASIC.SYSTEM-Be- 
fehlen ändern nicht das Präfix (außer na- 
türlich durch den Präfix-Befehl PREFIX, 
Ss, Dd selbst). 


5. ERLÄUTERUNG ZU DEN 
PROGRAMMEN 


Die Beispielprogramme gehen etwas über 
den bislang vermittelten ProDOS-Stoff 
hinaus und sollten deshalb hier nur kur- 
sorisch erklärt werden. 


CAT.ARRAY 


CAT.ARRAY, das als Unterroutine gedacht 
ist, gibt Ihnen die Möglichkeit, das gesam- 
te Directory, wie man es beim CATALOG- 
Befehl sieht, in einem String-Array abzule- 
gen, auf den Sie dann gezielt zugreifen 
können. So sind beispielsweise die Zeilen 
60100, 60130 und 60150 dergestalt modi- 
fiziert, daß nur eine Catalog-Anzeige in 40 
Z/Z erfolgt. Ferner werden durch Zeile 
60130 selektiv nur die BAS-Dateien ange- 
zeigt. In dem Listing PRODOS.DIRECTO- 
RY isteine „Zählzeile 12345...“ eingefügt, 
die es Ihnen leicht ermöglicht, auf die je- 
weiligen Positionen der einzelnen Datei- 
eintrag-Strings D$(X) mit MID$ zuzugrei- 
fen. Falls Sie das Programm auf umfang- 
reiche Subdirectories anwenden wollen, 
so erhöhen Sie bitte die DIM-Anweisung 
in Zeile 60020. 


CAT.SAVER 


CAT.SAVER entspricht CAT.ARRAY, doch 
wird der Catalog nunmehr nicht am Bild- 
schirm angezeigt, sondern auf der Disket- 
“te unter dem TXT-File „CAT.SAVE“ ge- 
speichert. 


EINTRAG.SUCHER 


Der EINTRAG.SUCHER sucht einen per 
INPUT eingegebenen, beliebigen Datei- 
eintrag aus einem nicht inhaltlich bekann- 
ten Directory heraus und vermeidet damit 
die Programmunterbrechung für den Fall, 
daß der gesuchte Name nicht existiert. 
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EINT 


199 

119 
6LPNP 
6191P 
61029 
61039 
610AB 
61959 
6106 


61079 
61989 
61999 
61199 
61119 


EINT 


199 
119 
129 
139 
140 
159 
16% 
17 
189 
199 
200 
210 
220 
239 
249 
259 
26% 
270 
280 
29 
309 


319 
329 


339 
349 
359 
360 
379 
380 


399 
409 


419 


420 


A430 
449 
459 


A460 
Aa7d 


480 
499 
509 


519 
520 
530 
549 
559 
569 
57 
580 





dos 94 





RAG.SUCHER 


INPUT "Dateieintrag: ";S$ 

GOSUB 61PPP: END 

REM EINTRAG. SUCHER 

PRINT CHR$ (4) ;"PREFIX": INPUT P$ 

PRINT CHR$ (4) ; "OPEN"; P$;", TDIR" 

PRINT CHR$ (4) ;"READ";P$ 

L = LEN (S$) 

INPUT D$: INPUT D$: INPUT D$: REM Ignorieren! 
F = ®: INPUT D$: IF MID$ (D$,2,L) = S$ AND MID$ (D$,L + 2,1) ="" 
THEN F = 1: GOTO 61®89: REM F=Such-Flag 

IF D$ < > "" THEN 616% 

PRINT CHR$ (4) ;"CLOSE";P$ 

IF F= 1 THEN PRINT P$;S$;" da!": GOTO 6111 
PRINT P$;S$;" fehlt!" 

RETURN 


RAG.ANALYSE 


REM EINTRAG. ANALYSE 

REM U.Stiehl/1985 

PRINT CHR$ (4) ;"PR#3" 

PRINT CHR$ (4) ;"CATALOG" 

INPUT "Dateieintrag: ";S$: IF S$ = "" THEN 149 
HOME : GOSUB 53® 

REM 768 = Byte 

REM CALL 769 
REM CALL 776 
REM CALL 783 High Nibble 

DATA 9,173,0,3,32,218,253,96,173,® 

DATA 3,32,227,253,96,173,0,3,74,74 

DATA 74,74,32,227,253,96 

RESTORE 

FOR X = 768 TO 793: READ Y: POKE X,Y: NEXT 

REM Dateieintrag per Binärfile suchen 

A = 8192:B = ®:L = 512: REM Address, Byte, Length 

0 = 4 + 39: REM Offset für nächsten Eintrag 

PRINT :CHRS (A7"BLOAD": PS:" TDIR, AVANT BB: TEL 

x=]1 

ON PEEK (A +0 + X) <> ASC ( MID$ (S$,X,1)) GOTO 310:X=X +1: 

ON X < = LL GOTO 399: GOTO 349 

0 = 0 + 39: IF 0 < 511 THEN 29 

IF PEEK (A+2) <>®BOR PEEK (A+3) <> THENB=B+HL:0O =4: 
GOTO 280: REM Nächster Block 

PRINT "Nicht gefunden!'": END 

PRINT "Gefunden!": IF F = ® THEN PRINT "Jedoch gelöschte Datei!" 

REM Komponenten des Dateieintrags 

PRINT : PRINT "Speichertyp: $";: POKE 768, PEEK (A + O0 + Ö): CALL 783: 
REM High Nibble 

PRINT : PRINT "Namenslänge: $";: POKE 768, PEEK (A + 0 + ®): CALL 776: 
REM Low Nibble 

PRINT : PRINT "Dateiname: ";: FORRX= (A+0 +1) TT (A+O +15): 
PRINT " $";: POKE 768, PEEK (X): CALL 769: NEXT 


Hexbyte 
Low Nibble 


of N 


PRINT : PRINT "Dateityp: $";: POKE 768, PEEK (A + 0 + 16): CALL 769 
PRINT : PRINT "Hauptzeiger: $";: POKE 768, PEEK (A + 0 + 18): CALL 769: 
POKE 768, PEEK (A + O0 + 17): CALL 769: PRINT " ($HHLL)"; 

PRINT : PRINT "Blockanzahl: $";: POKE 768, PEEK (A + 0 + 2®): CALL 769: 
POKE 768, PEEK (A + O0 + 19): CALL 769: PRINT "" ($HHLL)"; 

PRINT : PRINT "Dateilänge: $";: POKE 768, PEEK (A + 0 + 23): CALL 769: 
POKE 768, PEEK (A + O0 + 22): CALL 769: POKE 768, PEEK (A+0 + 21): 


CALL 769: PRINT '" ($HHMMLL)"; 

PRINT : PRINT "Create-Dat: $";: POKE 768, PEEK (A + O0 + 24): CALL 769: 
PRINT " $";: POKE 768, PEEK (A + 0 + 25): CALL 769 

PRINT : PRINT "Create-Uhr: $";: POKE 768, PEEK (A + 0 + 26): CALL 769: 
PRINT " $";: POKE 768, PEEK (A + 0 + 27): CALL 769 

PRINT : PRINT "Version-Nr: $'";: POKE 768, PEEK (A + 0 + 28): CALL 769: 
PRINT " $";: POKE 768, PEEK (A + 0 + 29): CALL 769 

PRINT : PRINT "Zugriff: $";: POKE 768, PEEK (A + 0 + 308): CALL 769 
PRINT : PRINT "Zusatzinfo: $";: POKE 768, PEEK (A + 0 + 32): CALL 769: 
POKE 768, PEEK (A + 0 + 31): CALL 769: PRINT " ($HHLL)"; 

PRINT : PRINT '"Mod-Datunm: $";: POKE 768, PEEK (A + 0 + 33): CALL 769: 
PRINT " $";: POKE 768, PEEK (A + 0 + 34): CALL 769 

PRINT : PRINT "Mod-Uhr: $";: POKE 768, PEEK (A + 0 + 35): CALL 769: 
PRINT " $";: POKE 768, PEEK (A + 0 + 36): CALL 769 

PRINT : PRINT "Kopfzeiger: $";: POKE 768, PEEK (A + 0 + 38): CALL 769: 
POKE 768, PEEK (A + O + 37): CALL 769: PRINT " ($HHLL)"; 

END 

REM Dateieintrag per Textfile suchen 

PRINT CHR$ (4) ;"PREFIX'": INPUT P$ 

PRINT CHR$ (4) ;"OPEN";P$;", TDIR" 

PRINT CHR$ (4) ;"READ'";P$ 

LL = LEN (S$) 

INPUT D$: INPUT K$: INPUT D$: REM Ignorieren! 

F = ß: INPUT D$: IF MID$ (D$,2,LL) = S$ AND MID$ (D$,LL + 2,1) = " " 
THEN F = 1: GOTO 699: REM F=Such-Flag 


45 





EINTRAG.ANALYSE 


Dieses umfangreiche, aber nützliche Pro- 2 
gramm erzeugt einen Hex-Dump aller Be- 619 
standteile eine Dateieintrages, und zwar = 


A . 639 
auch solcher Bestandteile, die normaler- 


weise nicht aus dem Catalog ersichtlich 
sind. Ferner können auch Dateieinträge 
von gelöschten Dateien angezeigt wer- 


IF D$ < > "" THEN 58 

PRINT CHR$ (4) ;"CLOSE";P$ 

PRINT P$;S$ 

IF F = 1 THEN PRINT : PRINT K$: PRINT D$ 
PRINT : RETURN 


Beispiel: Programm "EINTRAG.ANALYSE" auf Datei "EINTRAG. ANALYSE" 


selbst angewandt (hier enthalten in Subdirectory "DIR") 


den. Das Programm setzt theoretische ARUBENESEIRERTNIERLENIETEE 

Kenntnisse der Directory-Struktur voraus NAME TYPE BLOCKS MODIFIED CREATED ENDFILE SUBTYPE 
(S. „ProDOS für Aufsteiger“, Bd. 1, S, EINTRAG. ANALYSE BAS 6 13-JAN-85 9:00 13-JAN-85 9:0 2.12 
120ff). Ferner macht das Programm von Speichertyp: $2 

der in einer späteren Folge erläuterten Be $49 $4E $54 $52 $41 $47 $2E $41 $4E $41l $Ac $59 $53 $45 
Möglichkeit Gebrauch, eine Datei (hier das ee r ö “ i . 

Directory) mit dem BLOAD-B-Parameter Hauptzeiger: $P0D5 ($HHLL) 


. , Blockanzahl: $Pp®d6 ($HHLL) 
schubweise einzulesen. Dateilänge: $000840 ($HHMMLL) 


Create-Dat: $2D $AA 
Create-Uhr: $#® $09 
Version-Nr: $0® $09 


Zugriff: $E3 
= Zusatzinfo: $P8P1 ($HHLL) 


Mod-Datum: $2D $AA 
Mod-Uhr: 00 $00 
Kopfzeiger: $®®D3 ($HHLL) 


Trace-Bug 


Infolge diverser Pseudo-Trace-Fehler ge- 
rät das BASIC.SYSTEM oft ungewollt in 





den echten Trace-Modus (#-Zeillen- 10 FORX = 1 TO 60: REM «»®#*PR#S- 10 FORX = 1 TO 60: REM «#+PR#S- 


nummernanzeige während des laufenden Bug 


Applesoft-Programms). Da zur Zeit noch 2OIFX= 


FLASH-Bug 
20 THEN PR#0: PRINT 20 IFX = 20 THEN FLASH: PRINT 


verschiedene „Vorversionen“ des BASIC „Trace-Anfang“ „Trace-Anfang“ 


‚SYSTEMS in Umlauf gesetzt werden, ist 30IFX= 


40 THE POKE 242, 0: PRINT 30 1IFX = 40 THEN NORMAL: PRINT 


es für einen definitiven Patch noch zu früh. „Trace-Ende“ „Trace-Ende“ 


Beispiele: 40 NEXT 


PRODOS.READER 


Simulierter CP/M-TYPE-Befehl für ProDOS 
von U.Stiehl, 25.02.85 


Liest ProDOS-Dateien beliebiger Art und Größe 
schubweise in den RAM-Speicher $1999-$8FFF 

und erzeugt einen ASCII-Dump am Bildschirm. 
Speziell für sequentielle Textfiles gedacht. 
Ctrl-Zeichen (außer Return) werden invers 
dargestellt. Bei IIc/IIe auch mit 8®-Zeichenkarte 
möglich. Der Quellcode des Maschinenprogramms 
befindet sich auf der Peeker-Sammeldisk. 


100 REM PRODOS.READER von U.Stiehl/24.92.85 
110 DATA 76,7,3,0,16,0,144,173,3,3 

120 DATA 141,47,3,173,4,3,141,48,3,76 

130 DATA 30,3,238,47,3,208,3,238,48,3 

140 DATA 24,173,5,3,237,47,3,173,6,3 

150 DATA 237,48,3,176,1,96,173,255,255,9 
160 DATA 128,201,255,249,223,2®1,141,249,15,2®1 
170 DATA 1690,176,11,1905,64,141,99,3,32,128 
180 DATA 254,173,99,3,32,237 ,253,32,132,254 
190 DATA 173,0,192,16,193,44,16,192,173,® 
200 DATA 192,16,251,44,16,192,76,22,3 


40 NEXT 


PRINT : PRINT CHR$ (4);"PREFIX": INPUT P$: PRINT 
CHR$ (4);"CAT";P$: PRINT : INPUT "DATEI:";S$: IF S$ 
= '"" THEN 228 

REM Dateieintrag suchen 

PRINT CHR$ (4) ;"OPEN";P$;",TDIR": PRINT CHR$ 

(4); "READ";P$:L = LEN (S$) 

INPUT D$: INPUT D$: INPUT D$: REM Ignorieren! 

F = ®: INPUT D$: IF MID$ (D$,2,L) = S$ AND MID$ 
(D$,L + 2,1) =" " THEN F = 1: GOTO 299: 

REM F=Such-Flag 

IF D$ < > "" THEN 270 

PRINT CHR$ (4) ;"CLOSE";P$ 

IF F = ® THEN PRINT P$;S$;" FEHLT!": GET X$: 

GOTO 229 

REM Lesepuffer $1999-$9909 

T$ = "T" + MID$ (D$,18,3):LL = VAL ( MID$ 
(D$,66,6)) 

HOME : PRINT CHR$ (4);"FRE": POKE 773,9: POKE 
774,144: REM $909® 

IF LL < 32768 THEN R = LL: GOSUB 380:B = ®:L=R: 
GOSUB 399: GOTO 49 

B = ®:L = 32768: GOSUB 399 

B=B+L: IFB+L < LL THEN GOSUB 399: GOTO 369 
R = LL - B: GOSUB 389:L = R: GOSUB 399: GOTO 49® 


210 RESTORE : FOR X = 768 TO 866: READ Y: POKE X,Y: NEXT POKE 773,R - INT (R / 256) &» 256: POKE 774, INT (R 


220 TEXT : HOME : INVERSE : PRINT "PRODOS.READER": 


NORMAL : PRINT : PRINT : PRINT "START J/N ";: GET 


X$: PRINT X$: ON X$ = "J" OR X$ = "j" GOTO 239: 


ON X$ < > "N" AND X$ < > '"'n!" GOTO 229: HOME : END 


46 


/ 256) + 16: RETURN 

PRINT CHR$ (4)"BLOAD";P$;S$;",";T$;",A$1Q0R"; 
n,B":B;”" .L";L: CALL 768: RETURN 

PRINT : GET X$: PRINT CHR$ (4): GOTO 229 
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BUCHSHOP 


Apple DOS 3.3 

von Ulrich Stiehl 

2. Aufl. 1984, 203 S., kart., 
DM 28,- 


Dies ist die erste deutschspra- 
chige Darstellung des Disket- 
tenbetriebssystems DOS 3.3 
für den Apple Il/II Plus/lie, die 
sich sowohl an Applesoft- als 
auch an Assembler-Program- 
mierer wendet. Sinngemäß ist 
das Buch zweigeteilt: 

Der erste Teil behandelt aus- 
führlich die dem Applesoft-Pro- 
grammierer zur Verfügung ste- 
henden DOS-Befehle, wobei 
die Textfiles wegen ihrer gro- 
Ben Bedeutung und der ver- 
gleichsweise komplizierten 
Handhabung besonders darge- 
stellt werden. Viele Textfile- 
Tricks werden hier zum ersten- 
mal geschildert. 

Aber auch im zweiten Teil fin- 
det der reine Applesoft-Pro- 
grammierer insbesondere in 
dem Kapitel „Vermischte Tips, 
Tricks und Patches“ zahlreiche 
Anregungen. Im übrigen ist der 
zweite Teil für Assembler-Pro- 
grammierer gedacht. Neben ei- 
ner detaillierten Beschreibung 
der DOS-Interna enthält dieser 
Teil elf vollständige RWTS-An- 
wenderprogramme - z.B. 
CPM-Refiner, DOS-lose Da- 
tendisk, TSL-Maker, File- 
Reader, Pseudo-Disk-Driver 
und Fastbrun-Routine —, die 
Techniken enthüllen, die bis- 
lang noch niemals publiziert 
worden sind. Dieses DOS- 
Buch ist deshalb der unent- 
behrliche Begleiter für jeden 
Apple-Programmierer. 


Apple Il 

Basic Handbuch 
von Douglas Hergert 
304 Seiten, 116 Abb. 
DM 32,- 


Das Buch ist als Nachschlage- 
werk konzipiert, daß seinen 
Platz neben jedem APPLE Il, 
II+ und Ile haben sollte. Es 
richtet sich an Anfänger und 
fortgeschrittene Program- 
mierer. 


N 


Ze ee 


BASIC 
HAND 


| BUCH 


ES 


Aus der Praxis heraus präsen- 
tiert der Autor Tips und Vor- 
schläge, die das Programmie- 
ren leichter und zugleich effi- 
zienter machen. Alle Applesoft- 
und Integer-BASIC-Begriffe 
sind alphabetisch aufgelistet 
und werden eingehend erklärt. 





Dazu werden alle DOS-Befehle 
(neben vielen Begriffen der 
Computerterminologie) vorge- 
stellt. 

Beispielprogramme zeigen 
dem Nutzer, wie jeder Befehl 
funktioniert und helfen, die rich- 
tige Anwendung zu üben. Un- 
ter anderem lernt der Leser 
den besten Weg, um FOR/ 
NEXT-Schleifen und IF/THEN- 
Entscheidungen für seine 
Zwecke einzusetzen. 

Durch die präzise und leicht 
verständliche Sprache des Au- 
tors werden auch schwierige 
Befehle einfach in der Anwen- 
dung. 


Apple Maschinen- 
sprache 


von Don und Kurt Inman 
1984, 208 S., zahlr. Abb. und 
Tabellen, DM 49,— 


MASCHINEN 
_SPRACHE 


DON INMAN - KURT INMAN 





Dieses Buch ist wahrscheinlich 
die beste Einführung in die 
6502-Programmierung für den- 
jenigen Assembler-Anfänger, 
der zuvor noch nie ein Maschi- 
nenprogramm geschrieben 
hat. 

Aus dem Inhalt: 

Applesoft II BASIC - kurzge- 
faßt - Alles über Zeichen - Al- 
les über Speicher — Alles über 
Maschinenbefehle - Maschi- 
nenprogramme mit BASIC ein- 
geben —- Graphik — Text— Ton— 
Arithmetik — Was tun mit den 
Maschinenprogrammen 


Apple Il 

leicht gemacht 

von Joseph Kascmer 

1984, 185 S., zahlr. Abb., kart., 
DM 28,- 


Dies ist ein Buch, wie es sich 
jeder Apple-Anfänger nur wün- 
schen kann: Schrittweise, 
leichtverständliche Anleitung 
zum Umgang mit dem Apple 
mit einigen durchsichtigen, un- 
komplizierten Beispielen in Ap- 
plesoft, die ihn nicht Abschrek- 
ken, sondern ermutigen sollen, 
sich mit dem Gerät näher ver- 
traut zu machen. Damit ist „Ap- 
ple Il leicht gemacht“ das idea- 
le Einsteigerbuch für den rei- 
nen Anwender, der nicht nur 
„auf den Knopf drücken“, son- 
dern zumindest einige Details 
aus der Black Box namens Ap- 
ple erfahren will. 





Aus dem Inhalt: 

Kontrolle des Geräts — Schrei- 
ben und Zeichnen auf dem 
Bildschirm — Geheimnisvolle 
Abläufe: Programme - Ver- 
schiedene Eingriffsmöglichkei- 
ten - Mobile Speicher: Disket- 
ten — Kontrollmöglichkeiten — 
Das Innenleben 


Apple Assembler 
Tips und Tricks 


von Ulrich Stiehl 
1984, 226 S., 3 Abb., kart., 
DM 34,— 


„Apple Assembler“ wendet 
sich an alle, die bereits Anfän- 
gerkenntnisse der 6502-Pro- 
grammierung haben - z.B. 
aufgrund des Buches „Apple 
Maschinensprache“ — und nun- 
mehr ein Nachschlagewerk für 
ihren Apple Il Plus/lle/lic su- 
chen, in dem alle wichtigen 
ROM-Routinen sowie eine 
Vielzahl sonstiger Hilfspro- 
gramme in einer systemati- 
schen Form zusammengestellt 
werden. Insgesamt umfaßt die- 
ses Buch über 40 Utilities, dar- 
unter mehrere völlig neuartige 
Programme wie Double-Lores, 
Double Hires, Screen-Format 
u.a. 

Der erste Teil enthält ein Repe- 
titorium der wichtigsten Befeh- 
le, Adressierungsarten und 
sonstigen Besonderheiten des 
6502. 

Im zweiten Teil werden alle 
Adressen des Monitors zusam- 
mengestellt, die für Assembler- 
Programmierer von Nutzen 
sein können. Darüber hinaus 
findet der Leser Unterroutinen 
für hexadezimale Addition/ 
Subtraktion/Multiplikation/Divi- 
sion, Binär-Hex-ASCIl-Um- 
wandlung usw. 

Der dritte Teil befaßt sich mit 
der Speicherverwaltung der 
Language Card und der Ile- 
64K-Karte und enthält Move- 
Programme zum Verschieben 
von Daten in die und aus der 
Language Card sowie der 64K- 
Karte. 





Der vierte Teil ist dem Ap- 
plesoft-ROM gewidmet und li- 
stet eine große Anzahl nützli- 
cher Interpreter-Adressen. Bei 
den Utility-Programmen liegt 
das Schwergewicht auf Fließ- 
kommamathematik einschließ- 
lich Print Using. 

Der letzte Teil behandelt den 
Text- und Graphikspeicher. 
Neben einem professionellen 
Maskengeneratorprogramm 
werden auch Routinen zur 
Double-Lores- und Double-Hi- 
res-Grafik vorgestellt. 


Arbeiten mit dem 
Macintosh 


von N. Hesselmann 
416 Seiten, 320 Abb. DM 54,— 


Das Buch erklärt den Umgang 
mit dem Macintosh von Grund 
auf, wobei auch auf elementare 
Dinge eingegangen wird, wie 

z. B. die Benutzung der Tasta- 
tur und der Maus, das Einlegen 
von Disketten und den System- 
start. Ganz besonderes Augen- 
merk wird auf die Erklärung der 
speziellen Software-Umge- 
bung des Macintosh gelegt, 
wobei das Menü- und Fenster- 
konzept sowie das Anwählen 
durch Piktogramme gekenn- 
zeichneter Funktionen klar dar- 
gestellt wird. 


Der Umgang mit den Program- 
men MacPaint und MacWrite 
wird erläutert; dies geschieht 
teilweise anhand von Beispie- 
len, die leicht nachvollzogen 
werden können. Ein umfangrei- 
ches Kapitel ist dem für den 
Macintosh erhältlichen Micro- 
soft-BASIC gewidmet. 


BASIC Ubungen 

für den Apple 

von J. P. Lamoitier 

1983, 252 S., zahlr. Abb., kart., 
DM 38,— 


Das Buch ist konzipiert, allen 
Apple-Anwendern Applesoft- 
BASIC durch praktische Ubun- 
gen an Hand von reellen Pro- 
grammen beizubringen. Daten- 





verarbeitung, Statistik, kom- 
merzielle Programme, Spiele 
und vieles mehr. Jede Übung 
beinhaltet eine Beschreibung 
der Problemstellung, eine Ana- 
Iyse der Lösungsmöglichkei- 
ten, ein Flußdiagramm und ein 
fertiges Programm samt Pro- 
belauf. 


Aus dem Inhalt: 
Ihr erstes BASIC-Programm — 
Flußdiagramme — Übungen mit 
Integerzahlen — Elementare 
Beispiele aus der Geometrie — 
Allgemeine Übungen aus der 
Datenverarbeitung — Mathema- 
tische Berechnungen - Kauf- 
männische Berechnungen — 
Spiele - Operations Research 
— Statistik 


Apple ProDOS 
für Aufsteiger 
Band 1 


von Ulrich Stiehl 
1984, 202 S., kart., DM 28,- 


ProDOS ist das neue „profes- 
sionelle DOS“ (Professional 
Disk Operating System) für den 
Apple Ile sowie den mit einer 
Language Card ausgestatteten 
Apple Il Plus. Band 1 befaßt 
sich mit den theoretischen 
Grundlagen von ProDOS, der 
internen und externen Spei- 
cherorganisation und enthält 
grundlegende Beispielpro- 
gramme für Assembler-Pro- 
grammierer sowie generelle 
Untersuchungen zum BASIC- 
SYSTEM. Da ProDOS über er- 
heblich vielfältigere und lei- 
stungsfähigere, zugleich je- 
doch erheblich kompliziertere 
Dateistrukturen verfügt, sind 
theoretische Kenntnisse von 
ProDOS unabdingbar, wenn 
man die Features von ProDOS 
voll ausschöpfen will. 

Aus dem Inhalt: 

Ein erster Überblick - ProDOS 
und DOS 3.3 — Interne Spei- 
cherorganisation — Externe 
Speicherorganisation — MLI 
(Machine Language Interface) 
- ProDOS für Applesoft-Pro- 
grammierer 








Apples Maus lernt jetzt 
auch Pascal 





von Jürgen Geiß 
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Apples neuestes Eingabegerät heißt Maus. Es ist ein flaches 
Kästchen mit einem breiten „Kopf“ (Knopf) auf dem „Rük- 
ken“ und einem grauen „Schwanz“ (Kabel), der mit dem 
Computer verbunden wird. Erstmals wurde die Maus bei der 
Lisa vorgestellt. Beim Macintosh ist dieses Gerät bereits ein 
unabdingbarer Bestandteil des Mikrocomputers, d.h. der Mac 
läßt sich ohne Maus überhaupt nicht bedienen. Apple-Il- 
Besitzer, die die Maus einsetzen wollen, können nunmehr 
das sog. Maus-Paket erwerben. Allerdings läuft die Maus 
bislang nicht unter Pascal. Dieser Mangel wird durch die 
nachfolgende Pascal-Utility behoben. 


Das Maus-Paket umfaßt eine Interfacekar- 
te, die in einen beliebigen Slot des Apple 
Il, II+ oder Ile gesteckt werden kann, des 
weiteren die Maus, die mit der Karte zu 
verbinden ist, und eine Diskette mit dem 
Programm MousePaint, um die Benutzung 
der Maus zu demonstrieren. Für den Ap- 
ple IIc ist keine Interfacekarte nötig; viel- 
mehr wird hier das Kabelende einfach auf 
der Rückseite eingesteckt. 


Allgemeines zur Pascal-Implemen- 
tierung 


Pascal bietet die Möglichkeit, Unterpro- 
gramme in einer Bibliothek abzulegen, die 
bei häufigem Benutzen einfach mittels ei- 
ner „uses“-Deklaration im Programm er- 
klärt werden. Diese Unterprogramme wer- 
den in der SYSTEM.LIBRARY zusam- 
mengefaßt. Will man Assemblerprogram- 
me in die SYSTEM.LIBRARY einbinden, 
so muß auch eine Pascal-Hostdatei exi- 
stieren, die mit dem Assemblerprogramm 
zu linken ist, ehe sie in die SYSTEM.LI- 
BRARY eingebunden werden kann. Die 
Benutzung der Maus erfolgt durch die Unit 
Mousestuff, die aus einer Pascal-Hostda- 
tei und einem Assemblerteil besteht. 

Zuerst wird der Pascalteil eingegeben und 
übersetzt. Am besten nennt man die Pas- 
cal-Hostdatei MOUSESTUFF.TEXT und 
den Code entsprechend MOUSESTUFF.- 
CODE. Anschließend wird der Assem- 
blerteil eingegeben und assembliert. Nen- 
nen wir den Assemblerteiil MOUSE.- 
ASS.TEXT bzw. MOUSE.ASS.CODE. 
Nun wird die Pascal-Hostdatei mit dem 
Assemblerprogramm mittels des SY- 
STEM.LINKERSs gelinkt. Die Anweisungen 
für das Linken entnehme man dem „Apple 
Pascal Operating System Reference Ma- 
nual“. Schließlich wird der gelinkte Code 
noch in die SYSTEM.LIBRARY eingebun- 


Peeker 4/85 


den. Dies geschieht mit dem LIBRARY- 
Programm, das sich auf der APPLE3: Sy- 
stemdiskette befindet. Die Bedienung die- 
ses Programmes ist wiederum dem Hand- 
buch zu entnehmen. 


Die Beschreibung der Mouse-Unit 


Die Typen: Dem Benutzer der Mouse- 
Unit stehen zwei Pascal-Typen für die Pro- 
grammierung der Maus zur Verfügung: 
Mousemode und Mousestatus. 
Mousemode enthält folgende Kompo- 
nenten: 

Mouse_on: Soll die Maus eingeschaltet 
werden, so wird Mouse_on:= true ge- 
setzt, andernfalls Mouse_on:= false. 
Mouse_moved: Sollen Interrupts bei Be- 
wegung der Maus erzeugt werden, so wird 
Mouse_moved:= true gesetzt, sonst 
false. 

Button_pressed: Sollen Interrupts beim 
Drücken des Maus-Knopfes erzeugt wer- 
den, so muß Button_pressed:= true ge- 
setzt werden, sonst false. 
Screen_refresh: Sollen Interrupts jede 
1/60 Sekunde erzeugt werden, so muß 
Screen_refresh:= true gesetzt werden, 
sonst false. 

Reservdi — Reservd4 sind reserviert für 
zukünftige Erweiterungen. 

Nach dem Setzen der Komponenten von 
Mousemode muß die Prozedur Setmouse 
aufgerufen werden, die dann die Modi an 
das Mouse-Interface übergibt (siehe Bei- 
spielprogramme). 

Mousestatus ist das „Button und Inter- 
rupt Status Byte“ und enthält folgende 
Komponenten: 

ReservdT1: siehe oben. 

Mouse_moved: true, wenn ein Interrupt 
durch Mausbewegung erzeugt wurde. 
Button_pressed: true, wenn ein Interrupt 
durch das Drücken des Maus-Knopfes er- 
zeugt wurde. 
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Screen_refresh: true, wenn ein Interrupt 
erzeugt wurde, der mit Screen_refresh im 





Mousemode gesetzt wurde (jede 1/60 Se- 
Kunde). 

Reservo2: siehe oben. 

X_Y_changed: true, wenn die Maus be- 
wegt wurde und nicht, wie im Maus-Hand- 
buch steht, wenn sich die Maus-Koordina- 
ten geändert haben. 

Button_dwn_Ist: true, wenn der Knopf 
beim vorletzten Lesen der Mausdaten ge- 
drückt war. 

Button_down: true, wenn der Knopf ge- 
drückt ist. 


Die Prozeduren 


Dem Benutzer stehen folgende Prozedu- 
ren zur Verfügung: 

procedure setmouse (mode: mouse- 
mode): Diese Prozedur setzt die Maus in 
den Modus, der in der Variablen Mode 
angegeben wurde. 

procedure servemouse (var status: 
mousestatus; var mouse_interrupted: 
boolean): Wenn ein Interrupt durch die 
Maus verursacht wurde, wird der Status- 
record neu gesetzt. Ferner kann abgefragt 
werden, ob die Maus den Interrupt verur- 
sacht hatte. 

procedure readmouse (var x, y: integer; 
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var status: mousestatus; var mode: 
mousemode): Diese Prozedur liest die ge- 
samten Maus-Daten in die angegebenen 
Variablen ein. Befindet sich die Maus im 
passiven Modus, so ist dies die einzige 
Prozedur, mit der die gesamten Maus- 
Daten gelesen werden können. 


procedure posmouse (x, y: integer): 
Diese Prozedur setzt die Maus-Koordina- 
ten auf die neuen X- und Y-Werte. 


procedure clampmouse (x_min, x_max, 
y_min, y_max: integer): Der Wertebereich 
der Maus-Koordinaten kann durch diese 
Prozedur neu bestimmt werden. Wird 
clampmouse nicht aufgerufen, so gelten 
folgende Standardwerte: x_min = 
y_min:= 0, x_max = y_max:= 1023. 


procedure homemouse: Durch diese 
Prozedur wird die Maus-Position auf die 
unterste Grenze gesetzt, die mit clamp- 
mouse gesetzt wurde. Wenn clampmouse 
nicht aufgerufen wurde, so werden die 
Maus-Koordinaten auf x = y:= 0 gesetzt. 


procedure initmouse: Diese Prozedur 
muß vor allen anderen Prozeduren aufge- 
rufen werden. Sie initialisiert die Maus und 
setzt interne Default-Werte für clamp- 
mouse. Vorsicht: Bei einem Apple Il und 
Apple II+ überschreibt initmouse die Seite 
1 der Hires-Grafik. Deshalb ist es erforder- 
lich, diese Prozedur aufzurufen, bevor 
Grafiken erzeugt wurden. 


function mouse_found: boolean Das 
Funktionsresultat ist true, wenn sich eine 
Maus im System befindet. 


Nun können alle Mausprozeduren, die im 
Maus-Handbuch beschrieben sind, von 
Pascal aus mittels der uses-Mousestuff- 
Deklaration aufgerufen werden. So kann 
zum Beispiel leicht folgender Programm- 
teil benutzt werden: 

if mouse_found then initmouse usw. 
Istkeine Maus an das System angeschlos- 
sen und werden trotzdem Maus-Prozedu- 
ren aufgerufen, so erfolgt keine Fehler- 
meldung und es werden auch keine ROM 
Routinen angesprungen, so daß das Sy- 
stem auch korrekt weiterläuft, ohne sich 
„aufzuhängen”. 

Im Handbuch zur Maus werden einige 
Mausmodi angegeben, die mit Interrupt 
arbeiten. Da die Pascal-Versionen 1.0, 1.1, 
1.2 keine Interrupts verarbeiten können, 
empfiehlt es sich nicht, die Maus in einem 
dieser Modi zu betreiben. Daher sollte 
man die Maus nur im passiven Modus wie 
folgt benutzen: 


with Mode do 
begin 





Mouse_on := true; 

Mouse_moved := false; 

Button_pressed := false; 

Screen_refresh := false 
end; 


Mit diesem Modus wird Setmouse aufge- 
rufen. Die Maus befindet sich nun im pas- 
siven Modus und sendet keine Interrupts 
an das System. Dann können alle Maus- 
prozeduren benutzt werden. 


Beispielprogramme 


Zwei Programme sollen den Umgang mit 
der Unit Mousestuff verdeutlichen. 

Das erste Beispielprogramm, Testmouse 
genannt, druckt die X-und Y-Werte und 
den Status des Druckknopfes aus. Damit 
kann man die Bewegungen und das Drük- 
ken des Knopfes der Maus genau beob- 
achten. Das Programm wird verlassen, 
wenn mit dem Knopf der Maus zweimal 
geklickt wurde, ohne daß die Maus bewegt 
wurde. 

Das zweite Beispielprogramm, Draw- 
Mouse genannt, demonstriert, wie man 
mit Hilfe der Maus Grafiken erzeugen und 
bearbeiten kann. 

Das Programm fragt zuerst nach einem 
Dateinamen des Bildes. Der Name darf 
nicht das Suffix „.GRAF“ enthalten, da 
dieses automatisch hinzugefügt wird, und 
darf zudem nicht länger als 10 Buchstaben 
sein. Wird die Datei auf der Diskette ge- 
funden, so wird das entsprechende Bild 
geladen. 

Anschließend befindet man sich im Grafik- 
Bildschirm und hat einen Bleistift vor sich, 
mit dem gezeichnet werden kann, solange 
der Knopf der Maus gedrückt bleibt. Klickt 
man mit dem Knopf zweimal, ohne sich zu 
bewegen, hat man einen Radiergummi 
vor sich, mit dem man eventuelle Fehler 
wieder beseitigen kann. Auch der Radier- 
gummi ist nur aktiv, solange der Knopf der 
Maus gedrückt bleibt. Zweimaliges Klicken 
wandelt den Radiergummi wieder in einen 
Bleistift um usw. 

Wird die Tastatur benutzt, so werden die 
entsprechenden Zeichen an der Stelle, an 
der der Cursor (Bleistift oder Radiergum- 
mi) steht, auf dem Bildschirm ausgege- 
ben. Damit kann man seine Schöpfung mit 
Texten versehen. 

Das Programm kann durch Drücken der 
ESC-Taste verlassen werden, wobei das 
Bild auf Diskette gespeichert wird. Das 
Bild kann dann wieder beim erneuten Auf- 
ruf des Programmes geladen und weiter- 
verarbeitet werden. 
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MOUSESTUFF Mode : mousemode; 


Status : mousestatus; 
{$S+} X. : integer; 
{$von Jürgen Geiß; September 1984} ClickCount : integer; 


unit mousestuff; intrinsic code 25; begin 
initmouse; 
interface writeln ('Maustest: '); 
fillchar (Mode, size_of (Mode), 9); 
type mousemode = packed record Mode ..Mouse_on := true; 
Mouse_on : boolean; setmouse (Mode); 
Mouse_moved : boolean; clearmouse; 
Button_pressed : boolean; readmouse (X, Y, Status, Mode); 
Screen_refresh : boolean; 
Reservdl : boolean; 
Reservd2 : boolean; 
Reservd3 : boolean; with Status do 
Reservd4 : boolean; begin 


end; {Mousemode} gotoxy (9, 19); 
writeln ('X: ', X : 16); 


mousestatus = packed record writeln ('Y: ', Y: 16); 
Reservdl : boolean; writeln ('X_Y_changed: ', ord (X_Y_changed)); 


Mouse_moved : boolean; writeln ('Button_down_last: ', ord (Button_dwn_lst)); 
Button_pressed : boolean; writeln ('Button_down: ', ord (Button_down) ) 


Screen_refresh : boolean; end; {with} 
Reservd2 : boolean; 
X_Y_changed : boolean; ClickCount := ß; 
Button_dwn_lst : boolean; 
Button_down : boolean; repeat 
end; {Mousestatus} with Status do 
begin 
procedure setmouse (mode : mousemode); readmouse (X, Y, Status, Mode); 
procedure servemouse (var status : mousestatus; if X_Y_changed 
var mouse_interrupted : boolean); then ClickCount := 9 


procedure readmouse (var x, y : integer; else 
var status : mousestatus; if not Button_down and Button_dwn_lst 


var mode : mousemode); then ClickCount := ClickCount + ]; 
procedure clearmouse; 
procedure posmouse (x, y : integer); ir X_Y_changed or Button_down then 
procedure clampmouse (x_min, x_max, y_min, y_max : integer); begin 
procedure homemouse; gotoxy (15, 19); 
procedure initmouse; write (X : 4); 
gotoxy (15, 11); 
function mouse_found : boolean; write (Y : 4); 
gotoxy (18, 12); 
implementation write (ord (X_Y_changed)); 
gotoxy (18, 13); 
en nz ee ALGEN write (ord (Button_dwn_lst)); 
procedure setmouse {mode : mousemode}; gotoxy (18, 14); 
external; write (ord (Button_down) ) 
procedure servemouse {var status : mousestatus; end tif} 
var mouse_interrupted : boolean}; end {with} 
external; until ClickCount = 2; 
procedure readmouse {var x, y : integer; . 
var status : mousestatus; fillchar (Mode, size_of (Mode), 9); 
var mode : mousemode}; setmouse (Mode) {Schalte Maus ab} 


external; end. 
procedure clearmouse; 

external; 

procedure posmouse {x, y : integer}; 

external; 

procedure clampmouse {x_min, x_max, y_min, y_max 
external; 

procedure homemouse; 

external; 

procedure initmouse; 

external; 

function mouse_found {: boolean}; {$1-} 


external; {$R-} 
program DrawMouse (input, output); 


Beispielprogramm 2: DRAWMOUSE 


procedure searchmouse; 
external; uses Turtlegraphics, Applestuff, Mousestuff; 


begin {mousestuff} const Hiresblks = 16; 
searchmouse Xdots 280; 


end {mousestuff}. Ydots 192; 
Xmax 2719; 


Ymax 191; 
AdrPagel 8192; 


Beispielprogramm 1: TESTMOUSE PencilX 
PencilY 
program Testmouse (output); EraserX 
EraserY 
uses Mousestuff; 


BEL 
var I : integer; ESC 
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Penciltype 
Erasertype 


Trickarray 
RWtype 
XY_type 


Cursor 
LastCursor 
Memory 
Moved 

Key 

Keyhit 
Button_down 
Last_down 
ClickCount 
Command 


Pencil 
Eraser 


Graphfile 
Graphname 
Mode 
Status 

a 


packed array [l..PencilY, 1..PencilX] 
of boolean; 
packed array [l..EraserY, 1..EraserX] 
of boolean; 


= packed array [ß..®] of ®..255; 


(DoRead, DoWrite); 


= record 


X : integer; 
Y : integer 
end; {XYtype} 


: XY_type; 
: XY_type; 


TTrickarray; 


: boolean; 


char, 


: boolean; 
: boolean; 
: boolean; 


integer; 
integer; 


: Penciltype; 
ı Erasertype; 


file; 
string; 


: Mousemode; 
: Mousestatus; 


integer; 


{ 


procedure 


CreateLine (S : string); 


var I : integer; 


begin {Createline} 


for I := 


l to length (S) 


do Eraser [Row, I] :=S [I] <> ' '; 
Row := Row — 1 
end; {Createline} 


begin {InitEraser} 
Row := EraserY; 


Createline (' 
Createline 


ak!) ; 
* *"); 


(’ 
Createline (' * **'); 
“ 


Createline 
Createline (' x 


* ***'); 
“r** '); 


Createline ( "aaakakalakakakakk  ") ; 


Createline ('* ** ') 
Createline ( '#akikakakakık Y) 


. 


end; {InitEraser} 


begin {Init} 


Cursor.X 
Cursor.Y 
LastCursor 
Memory 
Command 


Moved 


149; 
92; 
Cursor; 
nl: 

i; 


= false; 


Keyhit ‘= false; 
Key ‘= chr (ß); 
5 Button_down ‘= false; 
. u Last_down ‘= Button_down; 
procedure lInit; 
if Mouse_found 
then 
begin 
Initmouse; 
fillchar (Mode, size_of (Mode), ®); 
Mode .Mouse_on := true; 
Setmouse (Mode); {setzte Maus auf passiven Modus 
(keine Interrupts)} 


procedure InitPencil; 


{erzeugt einen Bleistift} 
Clearmouse; 
Clampmouse (P, 2 & Xdots - 1, ®, 2 x Ydots - ]); 
{2 * Xdots, 2 & Ydots; damit werden 
feinere Bewegungen möglich} 
with Cursor do posmouse (X * 2, (Ymax - Y) x 2) 
end {then} 
else 
var I : integer; begin 
writeln 
(chr (BEL), 'Fehler: Keine Maus angeschlossen!'); 
exit (program) 
end; {else} 


var Row : integer; 


procedure CreateLine (S : string); 


begin {Createline} 
for I := 1 to length (S) 
do Pencil [Row, I] :=S [I] <> ' '; 
Row := Row -— 1 

end; {Createline} InitPencil: 


InitEraser; 


initturtle; 
fillscreen (white); 
with Cursor do moveto (X, Y); 
textmode 
end; {Init} 


{ 
procedure RW_Graph (ReadWrite : 


begin {InitPencil} 
Row := PencilY; 
Createline (' 
Createline 
Createline 
Createline 
Createline 
Createline 
Createline 
Createline 
Createline 
Createline 
Createline 
Createline 
Createline 
Createline 

end; {InitPencil} 


“** '); 
* x*'); 


RWtype); 


var Blocks : integer; 
begin {RW_Graph} 
case ReadWrite of 
DoRead : Blocks := blockread 
(Graphfile, Memoryf [AdrPagel], Hiresblks, ß); 
ı Blocks := blockwrite 
(Graphfile, Memory? [AdrPagel], Hiresblks, ) 


DoWrite 
end; {case} 


if Blocks <> Hiresblks then 
begin 
writeln 
(chr (BEL), 'Fehler beim Lesen/Schreiben der Grafik!'); 
exit (program) 
end {if} 
end; {RW_Graph} 


[—— 
procedure InitEraser; 
{erzeugt einen Radiergummi} 


var Row : integer; 
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procedure AskFile; 


begin {AskFile} 

repeat 
write 
('Name der Grafik-Datei (ohne das Suffix "GRAF"): '); 
readln (Graphnane); 
if Graphname = '' then Graphname := 'xSYSTEM.WRK'; 
Graphname := concat (Graphname, '.GRAF'); 
reset (Graphfile, Graphname); 


if IOresult = 9 
then 
begin 
writeln; 
writeln ('Lese ', Graphnanme); 
grafmode; 
RW_Graph (DoRead); 
textmode 
end {then} 
else rewrite (Graphfile, Graphname) 
until IOresult = ® 
end; {AskFile} 


procedure Testmouse; 
{liest die Mausdaten} 


begin {Testmouse} 
with Cursor do 
begin 
Readmouse (X, Y, Status, Mode); 


X :=X div 2; 
Y:=Ydiv2; 
Y := Ymax — Y 
end {with} 
end; {Testmouse} 


Um) 


begin {GetEvent} 
LastCursor := Cursor; 
Last_down := Button_down; 
Keyhit := keypress; 
if Keyhit then read (keyboard, Key); 


Testmouse; 

Button_down := Status.Button_down; 

with Cursor do Moved := (X <> LastCursor.X) or 
(Y <> LastCursor.Y); 


if Moved 
then ClickCount := 
else if Last_down and not Button_down then 
ClickCount := ClickCount + 1 
end; {GetEvent} 


procedure Draw; 


var Color : screencolor; 


{ a Ei Een En a Se ea a 


7 


procedure PencilDraw (Position : XY_type); 


begin {PencilDraw} 
with Position do 
if (X in [®..Xmax]) and 
(Y in [®..Ymax]) then 
drawblock 
(Pencil, 2, ®, ®, PencilX, PencilY, X, Y, 6) 
end; {PencilDraw} 


Sm) 


procedure DrawPencil; 
begin {DrawPencil} 


PencilDraw (Cursor) 
end; {DrawPencil} 
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procedure ErasePencil; 


begin {ErasePencil} 
PencilDraw (LastCursor) 
end; {ErasePencil} 


procedure EraserDraw (Position : XY_type; Mode : integer); 


begin {EraserDraw} 
with Position do 
if (X in [ß..Xmax]) and 
(Y in [®..Ymax]) then 
drawblock 
(Eraser, 2, ®, ®, EraserX, EraserY, X, Y, Mode) 
end; {EraserDraw} 


procedure DrawEraser; 


begin {DrawEraser} 
EraserDraw (Cursor, 6) 
end; {DrawEraser} 


procedure EraseEraser; 


begin {EraseEraser} 
EraserDraw (LastCursor, 
end; {EraseEraser} 


procedure DrawCursor; 


begin {DrawCursor} 
case Command of 
l : DrawPencil; 
2 : DrawEraser 
end {case} 
end; {DrawCursor} 


m 


procedure EraseCursor; 


begin {EraseCursor} 
case Command of 
l : ErasePencil; 
2 : EraseEraser 
end {case} 
end; {EraseCursor} 


procedure HandleMove; 
var Mode : integer; 


begin {HandleMove} 
case Command of 
l : with Cursor do moveto (X, Y); 
2 : if Button_down then 
begin 
Mode := 15; 
EraserDraw (Cursor, Mode) 
end {if} 
end {case} 
end; {HandleMove} 


re 


procedure HandleKeys; 


begin {HandleKeys} 
EraseCursor; 
wchar (Key); 
DrawCursor 

end; {HandleKeys} 
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procedure Init; 


begin {Init} 
Color := 


none; 


pencolor (Color); 
chartype (5); 
with Cursor do moveto (X, Y); 


DrawCursor 
end; {Init} 


Im 


begin {Draw} 
init; 


repeat 
GetEvent; 


if Glickcount 


begin 


ClickCount := ß; 
EraseCursor; 


Command 


:= Command + 1; 


if Command = 3 then Command := |]; 
DrawCursor 


end; {if} 


if Moved then EraseCursor; 


if Keyhit 


then HandleKeys; 


if Button_down 


then Color 
else Color 


:= black 
:= none; 


pencolor (Color); 


if Moved then 


begin 


HandleMove; 
DrawCursor 


end {if} 


until Keyhit and (Key = chr (ESC)); 


LastCursor 


end; {Draw} 


:= Cursor; 
EraseCursor; 


page (output); 


init: 
AskFile; 
Grafmode; 
Draw; 
textmode; 
writeln; 


write ('Grafik wird abgespeichert...'); 
RW_Graph_(DoWrite); 
close (Graphfile, lock) 


end. 


MAUS.ASS 


ERRRHRTHTK K K 


KEKEKEKKEKKEK KT TK TK  T K  € € 


type mousemode 


mousestatus = packed record 


procedure 
procedure 


procedure 


procedure 
procedure 
procedure 


procedure 
procedure 
function 


Externe Prozeduren für Unit MOUSESTUFF 


APPLE PASCAL. [1:9], 11:27, 13:2] 
= packed record 
Mouse_on 

Mouse_moved 
Button_pressed : boolean; 
Screen_refresh : boolean; 
Reservdl : boolean; 
Reservd2 : boolean; 
Reservd3 : boolean; 
Reservd4 ı boolean 
end; {mousemode} 


: boolean; 
: boolean; 


: boolean; 
: boolean; 


Reservdl 

Mouse_moved 
Button_pressed : boolean; 
Screen_refresh : boolean; 
Reservd2 : boolean; 
X_Y_changed ı boolean; 
Button_dwn_lst : boolean; 
Button_down : boolean 

end; {mousestatus} 


setmouse (mode : mousemode); 

servemouse (var status : mousestatus; 

mouse_interrupted : boolean) 

readmouse (var x, y : integer; 

var status : mousestatus; 

var mode : mousemode); 

clearmouse; 

posmouse (x, y : integer); 

clampmouse (x_min, x_max, y_min, y_max : 
integer); 

homemouse; 

initmouse; 


mouse_found : boolean; 


KR KKFFRRRKRK KK TF FF I FI KK KK FR FE KK IK IF IK IF IK KK I I IF FH I I FI a + a TR 


RER EFF KK 
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Wie man das Maus-Modul implementiert: 


Schritt 1: 


Schritt 2: 
Schritt 3: 


Schritt 4: 


Schritt 4a: 
Schritt 4b: 


Schritt 4c: 
Schritt Ad: 


Schritt 4e: 


MOUSESTUFF und MOUSE.ASS als Pascal- 
Textfile eingeben und abspeichern oder von 
Peeker-Sammeldisk mit GETDOS konvertieren 


MOUSESTUFF compilieren über C-Kommando 
unter MOUSESTUFF.CODE. 

MOUSE.ASS assemblieren über A-Kommando 
unter MOUSE.ASS.CODE. 

Linker über L-Kommando aufrufen: 


Auf Frage „Host-File?“ mit MOUSESTUFF ant- 
worten. 

Auf Frage „Lib-File?“ mit MOUSE.ASS ant- 
worten. 

Mit Return Linker beenden. 

Auf Frage „Map-File“ auch mit Return ant- 
worten. 

Auf Frage „Output-File“ mit MOUSE antworten. 


Schritt 5: 


Schritt 5a: 


Schritt Sb: 


Schritt 5c: 


Schritt dd: 


Schritt 5e: 


Schritt 5f: 


Somit entsteht die fertige Library unter dem 
Namen „MOUSE.CODE“. 


LIBRARY-Programm von 
über X-Kommando aufrufen: 
Auf Frage „Output-Code-File“ mit „x“ ant- 
worten. 


APPLES-Diskette 


Auf Frage „Link-Code-File“ mit „x“ ant- 
worten. 

Nunmehr mit „=“-Kommando alle Slots kopie- 
ren. 


Nun N-Kommando eingeben und wie in Schritt 
5b mit „MOUSE“ antworten. 

„1“ Return und danach z.B. „6“ Return (= muß 
ein noch freier Slot sein) eingeben. 

Mit Q-Kommando LIBRARY-Programm verlas- 
sen 
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pascal 94 





RR PLA 
STA MODEADR 
PLA 


STA MODEADR+1 


.NOPATCHLIST 


RETURN .EQU ®® 


.PROC SETMOUSE,1 
CNd® .EQU 92 


.REF CALLMOUSE, SLOT PLA 


STA STATUS_ADR 
PLA 
STA STATUS_ADR+1 


;Maus-Konstanten 
SET „EQU MODE_ADR .EQU 1% 
SERVE . EQU 
READ .EQU 
CLEAR . EQU 
POS .EQU 
CLAMP . EQU 
HOME . EQU 
INIT . EQU 


PULL RETURN 


PLA 

STA Y_ADR 
PLA 

STA Y_ADR+1 


;hole Adresse des Modus 
PLA 
STA MODE_ADR 
PLA 


STA MODE_ADR+1 PLA 


STA X_ADR 
PLA 
STA X_ADR+1 


X_LOW . EQU 

Y_LOW .EQU 

X_HIGH .EQU 578 
Y_HIGH .EQU 5F8 
RESERVD1 .EQU 678 
RESERVD2 .EQU 6F8 
STATUS .EQU 778 
MODE .EQU 7F8 


PUSH RETURN 


LDA SLOT 
Ba PUSH RETURN 
LDY #99 

LDA (MODE_ADR),Y 
LDY #SET 

JSR CALLMOUSE 


LDA SLOT 
BEQ $1 


LDY #+READ 
JSR CALLMOUSE 
LDX SLOT 


SER EEE KK 


l R 
.„MACRO PULL ’ e 


3 ak aka aka ak aka aka LDY #90 

LDA X_LOW,X 
STA (X_ADR),Y 
INY 

LDA X_HIGH,X 
STA (X_ADR),Y 


PLA 

STA %1 
PLA 

STA %1+1 


.PROC SERVEMOUSE, 2 


‚REF CALLMOUSE, SLOT 
. ENDM 
STATUSADR .EQU 19 


MOUSE_INTERADR .EQU 12 LDY #99 


LDA Y_LOW,X 
STA (Y_ADR),Y 
INY 

LDA Y_HIGH,X 
STA (Y_ADR),Y 


RER ER 


.MACRO PUSH PULL RETURN 
LDA %1+1 
PHA 

LDA %1 
PHA 


PLA 
STA MOUSE_INTERADR 
PLA 


STA MOUSE_INTERADR+1 LDY #99 


LDA STATUS, X 
.ENDM PLA STA (STATUS_ADR),Y 
STA STATUSADR 
PLA 


STA STATUSADR+1 


LDA MODE,X 
STA (MODE_ADR),Y 


SER EEE HR 


.PROC SET_CN_NG® 


$1 RTS 


PUSH RETURN 
.DEF SLOT 
LDA SLOT 


BEQ $1 ZERKRFRFKFERTEH EEE EEK 


PHA 
LDA 
ORA 
TAX 
ASL 
ASL 
ASL 
ASL 
TAY 
PLA 
RTS 


LDY #SERVE 

JSR CALLMOUSE 
;Hole Carry Bit in Akku als Bit ® 

ROL A 

AND #@1 


.PROC CLEARMOUSE 
.REF CALLMOUSE, SLOT 


LDA SLOT 


LDY +00 BEQ $1 


STA (MOUSE_INTERADR),Y 
INY 
LDA #99 
;Bit 7 immer ® 
STA (MOUSE_INTERADR),Y 


LDY #CLEAR 
JSR CALLMOUSE 


SLOT .WORD ® 


$1 RTS 


rk 
LDY #9® 

LDX SLOT 

LDA STATUS, X 

STA (STATUSADR),Y 


303 3% ak aka ak ak a ak aka aaa 
.PROC CALLMOUSE 


‚REF SLOT, SET_CN_N® .PROC POSMOUSE, 2 


PHA $1 RTS .REF CALLMOUSE, SLOT 
LDA #99 

STA CNO® 

LDA SLOT 

ORA #9c9 

STA CNOPß+1 

LDA (CN@®),Y 
JSR SET_CN_N® 
STA INDIRECT 
STX INDIRECT+Ll 
PLA 


JMP INDIRECT 


PULL RETURN 
LDX SLOT 


3 ERRRRTTTTTTTTTHHHHHR H E H 


.PROC READMOUSE, 4 
PLA 

STA Y_LOW,X 
PLA 

STA Y_HIGH,X 


.REF CALLMOUSE, SLOT 


X_ADR .EQU 1® 
Y_ADR .EQU 12 
STATUS_ADR .EQU 14 
MODE_ADR .EQU 16 


PLA 
STA X_LOW,X 
PLA 
STA X_HIGH,X 


INDIRECT .WORD ® PULL RETURN 
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PUSH RETURN 


LDA SLOT 
BEQ $1 


LDY #POS 
JSR CALLMOUSE 


$1 RTS 


SER EEEEEK E H 


.PROC CLAMPMOUSE, 4 


‚REF CALLMOUSE, SLOT 


XY_MIN_LOW 
XAY_MAX_LONW 
XY_MIN_HIGH 
XY_MAX_HIGH 


.EQU 478 
.EQU 4F8 
.EQU 578 
.EQU 5F8 


PULL RETURN 


PLA 
STA 
PLA 
STA 
PLA 
STA 
PLA 
STA 


LDA 
BEQ $1 
‚Setze neue Grenzen 
LDA 
LDY 
JSR 


#01 


PLA 
STA 
PLA 
STA 
PLA 
STA 
PLA 
STA 


PUSH RETURN 


APPLE - DISKETTEN LAUFWERKE 
Original Disk II m. Controller + DOS 3.3 + Hdbuch 
Original Disk Il (2. Laufwerk) 

Duo-Disk Station Slimline, 2x 143KB Chinon 
Siemens Disk-Laufw., 143KB, m. Kabel + Gehäuse 
Abor-Disk-Laufw., Slimline, 143KB, m. Kab. + Geh. 
Chinon Slimline, 143KB, Superleise, m. Kab.+Geh. 
Teac 55F, 1 MB unf. Kapazität, Shugartbus 

Teac 55F, kpl. in Gehäuse, 40/80 Track, 1MByte 
anschlußfertig, mit Umschaltung 40/80 + Kabel 
Zweitlaufwerk für Apple II C, 143 KB, mit Kabel 
APPLE -- INTERFACES + MAINBOARDS 
Disk Controller f. 2 Original o. kompat. Drives 
Super-Controller f. 2x Teac 55F, mit Software 

80 Zeich-Karte mit 64K RAM + Softsw. f. Ile 

80 Zeich-Karte Il, m. Softswitch, 2 Zeichensätze 
16K RAM Erweiterung für Il und kompatible 

Z 80A Interface Karte für CPM 2.2 

Z 80B Interface Karte für CPM 3.0, m. 64K RAM 
Printer-Grafik Interface, Epson kompatible 
Centronic-Paralell Text-Interface Karte 
Printer-Grafik Interface, NEC/ITOH kompatibel 
Anschluß Kabel f. Paralell + Grafik Interface 
Buffer Grafik-Interface, benutzbar für Drucker 
Epson/Nec/ltoh/Okidata u. andere m. 32K Buffer 
Buffer Interface wie vor aber mit 64K Buffer 
Anschluß Kabel f. Buffer Interface Karte 

232C Serielle Interface Karte 

Super Serielle Interface Karte, Fullduplex 

Sprach (Speech) Karte f. Sprachwiedergabe 

6522 Paralell Interface Karte 

Clock Karte (Datum/Uhrzeit) Ein/Ausgabe 

Eprom Writer Karte (2716 - 2764) 

IEEE-488 Interface Karte 

Logo-Karte mit Diskette und Handbuch 

Musik Karte m. Diskette und Handbuch 

PAL Color Interface Karte (UHF + Video) 

RGB Interface Karte (f. Apple Il + Il+) 

Wild Karte (kopiert über RAM-Bereich) 

128K RAM Erweiterungs Karte m. Patchsoftware 
256K RAM Erweiterungs Karte m. Patchsoftware 
6809 Prozessor Exell-9 Interfacekarte 

IC-Tester Interface Karte (RAMS/TTL 54/74) 
Hauptplatine 48K, o. Firmware Eproms, 8 Slots 
Hauptplatine 64K, wie vor 

APPLE - LEERPLATINEN - 


SLOT 


#CLAMP 
CALLMOUSE 


DM 
"DM 
"DM 
"DM 

DM 
"DM 
"DM 
"DM 

DM 


DM 
“DM 
DM 
"DM 
"DM 
"DM 
"DM 
"DM 
"DM 
"DM 
DM 
"DM 
"DM 
"DM 
*DM 
“DM 
"DM 
+ DM 
DM 
DM 
DM 


XY_MAX_LOW 


XY_MAX_HIGH 


XY_MIN_LOW 


XY_MIN_HIGH 


XY_MAX_LOW 


XY_MAX_HIGH 


XY_MIN_LOW 


XY_MIN_HIGH 


648.— 


APPLE 


Leerplatinen der obigen Interface Karten sind alle in vergoldet, 


m. Bestück-Aufdruck + Best.-Plan lieferbar. 
Leerplatinen mit der Kennzeichnung 

Leerplatinen mit der Kennzeichnung 

Leerplatinen mit der Kennzeichnung 
Experimentier Platine, für Apple Slot EX300 
Experimentier Platine, für Apple Siot EX500 
Leerplatine Motherboard, 48K, mit Best.-Aufdruck 
Leerplatine Motherboard, 64K, mit 6502 + Z80 
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* "DM 
"DM 
+ DM 
DM 
DM 
DM 
DM 


39,— 
24,50 
33, — 
29,90 
19,98 
66,— 
9— 


LDA SLOT 
BEQ $2 


‚Setze neue Grenzen für X-Koordinate 
LDA #90 


LDY #CLAMP 


JSR CALLMOUSE 


$2 RTS 


SER EEKK  K 


.PROC HOMEMOUSE 


.REF CALLMOUSE, SLOT 


LDA SLOT 
BEQ $1 


LDY #HOME 
JSR CALLMOUSE 


$1 RTS 


SER EKK 


.PROC INITMOUSE 


.REF CALLMOUSE, SLOT 


LDA SLOT 
BEQ $1 


LDY #INIT 
JSR CALLMOUSE 


für Y-Koordinate 


$1 RTS 


ER EEEK K K K 


.FUNC MOUSE_FOUND 


EXIT 


.REF SLOT 


‚Das höchste Byte einer Booleschen 
‚Variablen ist immer ® 


LDA #90 
PHA 
LDA SLOT 


;Keine Maus gefunden, dann 


BEQ $1 
LDA #91 


PHA 


PUSH RETURN 
RTS 


ZERKHKRHTFHT + 


.PROC SEARCHMOUSE 


.REF SLOT 


.EQU 99 
LDX 
LDA 
STA 
STA 
LDA 
STA 


#08 
+00 
SLOT 
TEMP 
#008 
TEMP+1 


DEC 
DEX 
BEQ 
LDY 
LDA 
CMP 
BNE 
LDY 
LDA 
CMP 
BNE 
STX 
RTS 


TEMP+1 


EXIT 

#+dC 
(TEMP) ,Y 
+29 

$1 

#+0FB 
(TEMP) ,Y 
+0D6 

$1 

SLOT 


RR KR KK 


PULL RETURN 


PLA 
PLA 
PLA 
PLA 


100% Apple-kompatibel 
bei Verwendung des 
Apple-Betriebssystems. 


6 Mon. Garantie 


APPLE -TASTATUREN+LEERGEHÄUSE+NETZTEILE- APPLE 
Standard Einbau-Tastatur, ASCII, freibel. 9 Tasten, 
Doppelbelg. aller Tasten, Groß+Kleinschr.Nr.N26 DM 
Tastatur wie vor, jedoch mit 15er Block Nr.N67 DM 
Tastatur Nr. N67, mit sep. Gehäuse, kpl. m. Kabel DM 
Seperate Tastatur IBM-Look, anschlußfertig mit 

Kabel, Dopp. belegt.Tasten, freiprog. Funkt. Tasten DM 
Seperate Tastatur, Eprom progr.-bar, Cursorblock 
Tastenfeld mit 24 Funktionen, Deutsch o. ASCIl DM 
Leergehäuse Standard, passend f. TastaturNr.N26 DM 
dto. wie vor, jedoch passend für 15er Tast. N67 DM 
Leergehäuse wie Mewa 9000, für Einbau von zwei 
Slimline-Laufwerken + Tastaturanschluß, Plastic DM 
Leergehäuse wie vor, jedoch in Metall-Ausführung DM 
Leergehäuse IBM-Look, f. 2 Laufw. Standard 5" DM 
Leergehäuse für 1 Slimline Laufwerk, Metall DM 
Leergehäuse f. Duo-Disk = 2x Slimline-Laufwerke DM 
Leergehäuse f. Duo-Disk = 2x Standard-Laufw. DM 
Leergehäuse f. Duo-Disk = 2x Slimline + Netzteil DM 
Schaltnetzteile für APPLE u. kompatible Rechner 
+5V/3,5A -5V/0,5A +12V/2A -12V/0,5A N73 DM 
+5V/5 A -5V/0,5A +12V/2,5A -12V/0,5a N74 DM 
+5V/7,5A -5V/0,5A +12V/2A -12V/0,5A N75 DM 
„et —. DISKETTEN + DISKETTEN-BOXEN - 
Profi Disk.Box, m. Schloß, Klars.-Deckel, 100Disks DM 
Disk Box mit Klars.-Deckel, ca. 70 Disketten 5" DM 
Hartbox für 10 Disketten, mit Klappdeckel DM 
Disketten, mit Verstärkungsring, 3 Jahre Garantie 

ABX 100 = SS/SD 10 Stck. a. 3,98 50 Stck. a. 3,88 500 Stck. a. 3,59 
ABX 200 = SS/DS 10 Stck. a. 4,08 50 Stck. a. 3,98 500 Stck. a. 3,69 
ABX 400 = DS/DD 10 Stck. a. 4,98 50 Stck. a. 4,88 500 Stck. a. 4,59 


139,— 
178,— 
249,— 


298,— 


398,— 
98— 
119,— 


159,— 
198,— 
198,— 

19,90 

8— 
109,— 
179,— 


99,80 
119,80 
149,50 

49,— 

28,— 

6,90 


Reparaturservice 


APPLE -- ORIGINAL + KOMPATIBLE - COMPUTER -- APPLE 
APPLE Ile, 64KRAM, Ascii-Tastat. + UHF-Modul. DM 2198,— 
APPLE Ile, Einstiegspaket = Computer 64KRAM, 
+ Philips-Monitor 18 Mhz grün + Siemens F122 - 
Laufwerk 143K m. Controller + Lerndiskette 
APPLE II CC, 128 KRAM, ASCII Tastatur 

APPLE II C, wie vor, jedoch deutsche Tastatur 
MACINTOSH System komplett m. Mouse + Tastatur 
+ Macwrite/Macpaint, Systemguide-Diskette 
MEWA-48K, Apple kompat., Netzt. 5Amp, Tastatur 
mit Dopp-Belegung + 10 frei Prog. Tasten, mit 
UHF-Mod,, ohne Firmware Eproms. 

MEWA-64K. wie vor jedoch mit 15er Block 

MEWA 9000er Serie, mit seper.Tastat. DIN o. ASCIl 
m. dopp. belegt. Funkt-Tasten, Cursorbl. + 15er 
Block Netzt. 5 Amp., Gehäuse für 2x Slimline- 
Laufwerke UHF-Modulator, o. Firmw.-Proms 
(12KROM), 48K RAM 

MEWA 9000-64-C, wie vor jedoch 64K RAM 
MEWA 9000-64-C Einstiegspaket, wie vor, jedoch 
mit 1 Disk Drive eingeb. + Disk-Contr. + Monitor, 
grün DM 2098,— 
IBM-Look Gehäuse für MEWA 9000 Serie Aufpreis DM 68,— 


ser". MATRIX- UND TYPENRAD - DRUCKER -— """""""" 
CP-80 Matrix Drucker, Epson kompat., vollgrafikf. DM 739,— 
CP-80 X mit eingeb. Interface für VC 64 f. Sim. B. DM 899,— 
SPEEDY 100-80, Epsonkompat., 1002Z/s,v.-grafikf(. DM 759,— 
GEMINI 10X, Neu mit Textsp., 100 Z/s., 9x9 Mat. DM 998,— 
GEMINI 15X, wie 10X, jedoch bis 375 mm Papierbr. DM 1198,— 
ITOH 8510 B, Die Zuverlässigkeit in Person DM 1475,— 
JUKI 6100. Typenraddr., 22 Z/s, TA-Typenräder DM 1495, — 


DM 3098,— 
DM 2795,— 
DM 2998,— 


DM 5995,— 


DM 888,— 
DM 948,— 


DM 1098,— 
DM 1198,— 


Computer-Artikel Nachnahmeversand unfrei, Zwischenverkauf vorbehalten. 

Angebote freibleibend unter Anerkennung unserer Lieferbedingungen. Technische Änderungen vorbehalten. "Apple ist eingetragenes 
Warenzeichen der Fa. Apple-Computer Inc., Kalifornien. Ware mit Rückgaberecht, besonders gekennzeichnet, muß frei zurückgeschickt 
werden. *IBM* ist eingetragenes Warenzeichen der Firma IBM GmbH Ffm. 


COMPUTER CENTER CONEX 


5650 SOLINGEN 11 : Postfach 11 0206-11 G 
Telefon (0 21 22) 754.49 


ERICH-WILLI MEYER 


6343 FROHNHAUSEN - Postfach 70 11 
Telefon (027 71) 350 71 


.END ;mousestuff 


“..... 


IBM °'* KOMPATIBEL IBM *°** KOMPATIBEL * 
Alle Teile unterliegen einer sorgfältigen Endkontrolle und wir 
übernehmen daher volle Garantie für die Funktionsfähigkeit, 
sowohl für die gelieferten Leerplatinen, als auch für die fertig 
bestückten Boards und Interface Karten, die fast ohne Ausnahme 
mit gesockelten IC's geliefert werden. 

IBM -- Kompatible Interface Karten und Mainboards -- IBM 
Disk Controller Karte für 2 Disk-Drives *KL-2020 DM 310,— 
Disk Controller Karte für 4 Disk-Drives *KL-2021 399,— 
Color Video Board, Farb- und Video Ausg. *KL-2050 698,— 
Monochrome Video Boards *KL-2060 398,— 
RS 232 Drucker Interface Karte KL-2074 199, — 
Centronics Paralell Interface Karte KL-2072 198,— 
Multifunktion Karte, RAM-Bereich, RS232, 
Paralell, Clock, mit OK bestückt 

dto. wie vor, jedoch mit 128K bestückt 
dto. wie vor, jedoch mit 256K bestückt 
512K RAM Karte, mit O K bestückt KL-2095 
dto. wie vor, mit 128K bestückt KL-2096 
Multi I/O Interface Board, RS232, Disk-Controller, 
Centronics, Clock, Joystick 
und Lightpen-Port 

Eprom Writer Karte (bis 128K benutzbar) a.A. 
Hardisk/Winchester Host-Adapter Karte *KL-2022 DM 1188,— 
Mainboard XT Version, 8 Slots 64K bestückt 

mit 1 Boot-Eprom, 6 Eprom-Plätze frei *KL-1004 DM 1288,— 
dto. wie vor, jedoch mit 128K bestückt *"KL-1005 DM 1449,— 
dto. wie vor, jedoch mit 256K bestückt "KL-1006 DM 1789,— 
Mainboard PC Version, 8 Slots, 64K bestückt 

mit 1 Boot-Eprom, 6 Eprom-Plätze frei "KL-1010 DM 999,— 
dto. wie vor, jedoch mit 128K bestückt *KL-1011 DM 1289,— 
dto. wie vor, jedoch mit 256K bestückt *"KL-1012 DM 1579, — 
Bei den mit * gekennzeichneten Artikeln gehört zum Lieferumfang 
ein Manual, und z. T. ein Schaltbild. 

IBM -- Kompatible Leerplatinen + Boards - 
Disk Controller f. 2 Drives DM 
Disk Controller f. 4 Drives DM 
Color Grafik Video Board DM 
RS232 Interface Karte DM 
Centronics Paralell Interface Karte DM 
Multifunktion Interface Board DM 
Eprom Writer Interface Karte 

Multi I/O Board DM 
Mainboard XT Version, 8 Slots DM 
Mainboard PC Version, 8 Slots DM 
RAM Card für Speicher-Erweiterung DM 
Alle Leerplatinen werden mit Bestückungsplan geliefert. 
Schaltbilder, soweit verfügbar, Lieferung gegen Aufpreis. 
IBM -- Gehäuse/Netzteile/Tastaturen/Diskdrives - 
Rechner Leergehäuse f. Einbau v. 2 Drives 
Profi-Tastatur, m. Kabel im Gehäuse, ASCIl 
dto. wie vor, jedoch deutsche DIN Belegung 
Standard Tastatur, IBM-Look, ASCII 
Netzteil, mit Ventilator, 100 Watt 

dto. wie vor jedoch 135 Watt 

Disketten Laufwerk, 2x40 Track DS/360 KB 
Harddisk 10MByte, kpl. m. Xebec Controller 


"KL-2040 
"KL-2041 
"KL-2042 


"KL-2071 


IBM 
236,— 
395,— 
489,— 
298,— 
298,— 
350,— 
498, — 
DM 3490,— 
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Dieser Artikel soll Grundkenntnisse 
über die Benutzung des Betriebssy- 
stems CP/M 2.2/2.23 vermitteln. Er rich- 
tet sich nicht nur an diejenigen, die ihre 
ersten Schritte in CP/M machen wollen, 
sondern auch an die Anwender kom- 
merzieller Programme wie WORDSTAR 
und DBASE Il oder der CP/M-Dienst- 
programme, z.B. zur Herstellung von 
Sicherheitskopien. 


CP/M wurde 1973 als herstellerunabhän- 
giges Betriebssystem entwickelt. Sein ho- 
hes Alter ist auf der einen Seite der Grund 
für einen erheblichen Mangel an Komfort, 
andererseits steht dem Anwender heute 
ein großes Angebot an Software zur Verfü- 
gung, das auf den Rechnern unterschied- 
lichster Hersteller läuft — vorausgesetzt, 
sie enthalten einen Z80-Prozessor. Um 
CP/M auf dem Apple zu benutzen, ist da- 
her die Anschaffung der sog. „Z80-Soft- 
card“ erforderlich. 


Installierung der Z80-Softcard 

Bei der Installierung dieser Zusatzkarte 
sollten Sie gleich die Belegung der ande- 
ren Slots Ihres Apples überprüfen. CP/M 
erwartet folgende Zuordnung: 
Disk-Controller: Unbedingt in Slot 6, wei- 
tere Laufwerke können an Slot 5 und 4 
angeschlossen werden. 
Drucker-Interface: Grundsätzlich in Slot 1, 
eventuell auch 2. 

Videokarte (80 Z/Z): Slot 3 

Die Z80-Softcard kann an beliebiger Stelle 
eingesteckt werden, allerdings wird Slot 4 
empfohlen. Eine Ausnahme bildet lediglich 
der Steckplatz 0, eine dort befindliche 
16K-Karte wird von CP/M - je nach ge- 
wählter Version — mitbenutzt. 


Erste Annäherung 


Starten von CP/M 2.2 

Zum besseren Verständnis der nun fol- 
genden Beschreibung des Betriebssy- 
stems sollten Sie jetzt an Ihrem Rechner 
Platz nehmen und CP/M starten. Dazu 
müssen Sie lediglich Ihre CP/M-Master- 
disk in das Bootlaufwerk (Slot 6, Drive 1) 
einlegen und den Computer einschalten. 


Ein wichtiger Hinweis: Es gibt (minde- 
stens) drei Varianten der aktuellen CP/M- 
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CP/M für Einsteiger 


Version 2.2, von denen nur eine (CP/M 
2.2 44K) auf Geräten mit 48K RAM läuft. 
CP/M 2.2 56K /60K benötigen, wie es 
schon die Bezeichnung vermuten läßt, ei- 
nen vollausgebauten 64K-Speicher, was 
zur Arbeit mit kommerziellen Programmen 
aber auch dringend empfohlen werden 
muß. 


Nach dem Booten meldet sich CP/M unter 
Angabe der genauen Versionsbezeich- 
nung (z.B. CP/M 2.23 60K ...) mit dem 
sog. Prompt „A>“. CP/M erwartet jetzt 
von Ihnen die Eingabe einer Anweisung; 
der Buchstabe im Prompt gibt dabei das 
Bezugslaufwerk an (Wir kommen gleich 
noch darauf zurück, was es damit auf sich 
hat). 

Unter CP/M werden übrigens alle Lauf- 
werke mit Buchstaben bezeichnet; es gilt 
dabei folgende Laufwerkszuordnung: 

A: Slot 6, Drive 1 

B: Slot 6, Drive 2 

C: Slot 5, Drive 1 

D: Slot 5, Drive 2 


DIR — Ausgabe des Directory 

Tippen Sie jetzt einmal den Befehl „DIR“ 
ein. Diese Anweisung muß wie fast alle 
CP/M-Kommandos mit Betätigung der 
<RETURN>-Taste abgeschlossen wer- 
den. Der Rechner gibt Ihnen nun das In- 
haltsverzeichnis (englisch: DiRectory), 
und zwar das vom Drive A:, dem derzeiti- 
gen Bezugslaufwerk, aus. 

CP/M wird alle Ihre Befehle auf dieses 
Laufwerk beziehen, solange diese keine 
Laufwerksangabe (Kennbuchstabe und 
„..) enthalten. Wollen Sie also das DIRec- 
tory einer Disk im Drive B: betrachten, 
müssen Sie „DIR B:* benutzen. 

Es gibt noch eine Alternative: Sie können 
dem Rechner mitteilen, daß ein anderes 
Bezugslaufwerk verwendet werden soll. 
Geben Sie einfach den entsprechenden 
Laufwerkskenner ein, beispielsweise 
„B:<RETURN>", Es erscheint als Prompt 
„B>“. Der Befehl „DIR <RETURN>*“ 
zeigt jetzt den Inhalt der Disk B: an. Mit 
„A:<RETURN>" gelangen Sie wieder in 
die Ausgangsstellung zurück. (Falls Sie 
noch keine zweite CP/M-Disk haben, soll- 
ten Sie das hier Gesagte noch nicht aus- 
probieren, da der Versuch, auf ein Lauf- 
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werk zu wechseln, das keine lesbare Disk 
enthält, i.d.R. zum „Absturz“ des Be- 
triebssystems führt. Sie müssen dann den 
Rechner abschalten!) 


Dateien und Dateinamen 

Zunächst wollen wir uns noch einmal nä- 
her mit dem DiIRectory befassen: Dieses 
Inhaltsverzeichnis gibt die Namen aller auf 
der Diskette befindlichen Dateien (engl.: 
Files) aus. Wie Sie selber schnell feststel- 
len können, sind diese Filenamen alle ähn- 
lich aufgebaut: ein bis zu acht Buchstaben 
umfassender eigentlicher Name, gefolgt 
von einem „.“ und einer sog. „Filetype“- 
Angabe, die im Regelfall grundsätzliche 
Aussagen über den Inhalt einer Datei zu- 
läßt. So kennzeichnet z.B. „.BAS“ ein Ba- 
sic-Programm, „.TXT“ einen gespeicher- 
ten Text und „.COM“ einen Command- 
File. Was verbirgt sich nun hinter dieser 
letztgenannten Bezeichnung? 

Ein Command-File enthält ein ausführba- 
res Programm, das von CP/M aus gestar- 
tet werden kann. So gibt es z.B. auf der 
CP/M-Masterdisk „COPY.COM“, eine 
Utility (Hilfsprogramm) zum Kopieren gan- 
zer Disketten. Es wird insbesondere benö- 
tigt, um Sicherheitskopien von Datendisks 
oder Programmen anzufertigen, was übri- 
gens nicht nur für kommerzielle Compu- 
terbenutzer ratsam ist. 


COPY - Kopieren ganzer Disketten 

Der Befehl zum Starten eines solchen 
Programms hat im wesentlichen die Form 
„Laufwerk:Programmname ...weitere An- 
gaben...“. Betrachten wir nun — um kon- 
Kret zu werden — den Fall, daß Sie eine 
Kopie (engl.: Backup) ihrer CP/M-Master- 
disk, die jetzt in Drive A: liegt (davon sind 
wir ja ausgegangen) machen wollen. Le- 
gen Sie eine leere Diskette in Drive B: ein 
und geben Sie „COPY B:=A: <RE- 
TURN>* ein. 

(Falls Sie als Bezugslaufwerk Disk B: ge- 
wählt haben — Sie erkennen das am 
Prompt „B>" — müssen Sie das Kopier- 
programm mit „A:COPY B:=A: <RE- 
TURN>* starten, um dem Rechner mitzu- 
teilen, daß er „COPY.COM“ im Laufwerk 
A: findet. Tun Sie das nicht, wird Sie CP/M 
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mit der Meldung „COPY?“ darauf hinwei- 
sen, daß es den entsprechenden File nicht 
gefunden hat.) 

Das Kopierprogramm wird sich dann mit 


einer Überschrift (APPLE II CP/M/16 
SECTOR DISK COPY PROGRAM) mel- 
den und Sie auffordern, das Original 
(engl.: MASTER) in Laufwerk A: und die 
Zieldiskette (SLAVE) in Drive B: einzule- 
gen. Vergewissern Sie sich nochmals, ob 
Original und Duplikat in den richtigen Lauf- 
werken liegen und drücken Sie <RE- 
TURN> zum Starten des Kopiervorgan- 
ges. Sobald dieser beendet ist, werden 
Sie gefragt, ob Sie eine weitere Kopie 
anfertigen wollen. Bei negativer Antwort 
fordert Sie der Rechner zum Einlegen der 
CP/M Masterdisk in Drive A: auf- in unse- 
rem speziellen Fall sollte das ja erfüllt sein. 
Einige Bemerkungen sind zum Kopiervor- 
gang noch zu machen: 

Der allgemeine Befehl zum Starten des 
Kopierprogramms lautet „COPY Ziellauf- 
werk:=Originallaufwerk: /Parameter“. Sie 
können dabei auch Kopien unter Benut- 
zung nur eines Laufwerks anfertigen (z.B. 
„COPY A:=A:“). Das Programm fordert 
Sie dann entsprechend zum Disketten- 
wechseln auf. Eine weitere Form dieses 
Kommandos ermöglicht es Ihnen, nur das 
Betriebssystem CP/M zu kopieren: „CO- 
PY B:=A: /S“. Wir werden später darauf 
zurückkommen. 


FORMAT - Formatieren von Disketten 
Es gibt Versionen des COPY-Programms, 
die nicht in der Lage sind, auf unbenutzte 
Disketten zu kopieren. Diese müssen 
dann vorher erst entsprechend hergerich- 
tet (formatiert) werden. 

Dafür ist die FORMAT-Utility zuständig. 
Dieses Programm befindet sich ebenfalls 
auf der CP/M-Masterdisk und wird mit 
„FORMAT Laufwerk: <RETURN>" ge- 
startet. Legen Sie also z.B. eine neue Dis- 
kette in Drive B: ein und tippen Sie „FOR- 
MAT B: <RETURN>*. Überprüfen Sie, ob 
die zu formatierende Disk tatsächlich der 
Aufforderung des Programms entspre- 
chend eingelegt wurde, und betätigen Sie 
die <RETURN>-Taste zum Start des For- 
matiervorganges. Nach dessen Beendi- 
gung haben Sie eine leere Diskette zur 
Verfügung, auf die Sie jetzt Dateien kopie- 
ren können. Überzeugen Sie sich selbst 
(„DIR B:“, s.o.)! Selbstverständlich kann 
die leere Disk auch zur Datenspeicherung 
für Programme wie WORDSTAR oder 
DBASE benutzt werden. Wollen Sie sie 
allerdings als Bootdisk zum Starten des 
CP/M-Systems verwenden, müssen Sie 
noch mit „COPY B:=A:/S <RETURN>" 
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das Betriebssystem auf Ihre neue Disk 
Kopieren. 


Das COPY- sowie das FORMAT-Pro- 
gramm benutzen folgende Fehlermel- 
dungen: 

DISK WRITE PROTECTED: Die Schreib- 
schutzkerbe auf der rechten Diskettensei- 
te ist überklebt. 

DISK I/O-ERROR: Die Diskette ist defekt 
oder - falls es die Zieldiskette ist — nicht 
formatiert (s.o.). 

COMMAND ERROR: Sie haben beim Start 
des Programms einen Fehler gemacht, 
z.B. „COPYB=A“ anstatt „COPY B:=A:" 
geschrieben. 


Am besten fertigen Sie sich jetztnoch eine 
weitere Kopie der CP/M-Masterdisk an, 
damit Sie eine Möglichkeit haben, die Be- 
nutzung der im folgenden erklärten Befeh- 
le zu üben. Es geht dabei um die sog. 
„Built-In Commands“. 


„Eingebaute Befehle“ 


Befehle, die sozusagen in das Betriebssy- 
stem „eingebaut“ sind, werden als Built-In 
Commands bezeichnet (Der Gegensatz 
dazu sind die „Transient Commands“ wie 
der oben erwähnte „FORMAT“-Befehl, zu 
dessen Ausführung ein Hilfsprogramm 
von der Masterdisk geladen werden muß- 
te. Die eingebauten Befehle dagegen 
funktionieren immer, egal, welche Diskette 
eingelegt ist). Das erste „Built-In Com- 
mand“ haben Sie übrigens schon kennen- 
gelernt; es war der DIR-Befehl zur Anzei- 
ge des Inhaltsverzeichnisses. 


ERA - Löschen von Dateien 

Zum Löschen von Dateien dient der ERA- 
Befehl. Er hat die allgemeine Form „ERA 
Filename.Filetyp <RETURN>", also z.B. 
„ERA COPY.COM <RETURN>" oder 
„ERA B:ED.COM <RETURN>". 

Nun kann es sein, daß Sie mehr als nur 
einen File löschen wollen, z.B. alle Dateien 
vom Typ „.TXT“. Für diesen Zweck gibt es 
sog. Wildcard-Zeichen. So löscht der Be- 
fehl „ERA B:*.BAS" alle Basic-Program- 
me auf der Disk B:; „ERA KUNDEN.x“ 
entfernt alle Dateien, die mit „KUNDEN“ 
beginnen (KUNDEN.TXT, KUNDEN.DAT 
usw.) und mit „ERA C:x*.*“ räumen Sie 
die gesamte Diskette im Laufwerk C: leer! 
Am besten probieren Sie dies alles einmal 
aus — aber bitte nur auf einer der vorhin 
angefertigten Kopien! 


REN - Ändern von Dateinamen 
Manchmal erscheint es sinnvoll, einen Da- 
teinamen zu ändern. Das ist mit Hilfe des 


REN-Kommandos (engl.: REName umbe- 
nennen) kein Problem. Hier lautet die all- 
gemeine Form „REN neuer Name = alter 
Name <RETURN>"; so wird mit dem Be- 
fehl „REN KOPIE.COM = COPY.COM“ 
der Name des schon bekannten Kopier- 
programms in KOPIE.COM umgewandelt. 
Probieren Sie auch dies und überzeugen 
Sie sich mit Hilfe des DIR-Befehls von der 
Wirkung. (Wenn Sie diese neu benannte 
Utility benutzen wollen, müssen Sie natür- 
lich z.B. „KOPIE B:=A: <RETURN>" 
eingeben!) 

Zwei weitere, eingebaute Befehle, die 
aber keine große Bedeutung haben, sind 
der USER-Befehl, mit dem eine Diskette in 
verschiedene Benutzerbereiche aufge- 
trennt werden kann, und das TYPE-Kom- 
mando. Mit dem letztgenannten ist es 
möglich, den Inhalt einer Datei auf dem 
Bildschirm oder Drucker auszugeben (z.B. 
TYPE DEMO.TXT <RETURN>). Sie soll- 
ten diesen Befehl aber nur auf Files an- 
wenden, die Texte enthalten, keineswegs 
aber auf Programme wie COPY.COM, da 
sonst die merkwürdigsten Dinge gesche- 
hen könnten. 


! P- Einschalten des Druckers 
Sicherlich haben Sie sich schon gefragt, 
wie man z.B. ein Inhaltsverzeichnis aus- 
drucken kann: Das Ein- und Ausschalten 
des Druckers geschieht durch die Eingabe 
von „TP<RETURN>" (TP steht dabei 
für Ctrl-P). 

Die Befehlsfolge „ T P<RETURN> DIR BB: 
<RETURN> ?} P<RETURN>" beispiels- 
weise druckt ein Inhaltsverzeichnis der 
Disk B: und schaltet danach den Printer 
wieder ab. 


... Noch mehr Control-Zeichen 

Lassen Sie uns in diesem Zusammenhang 
noch auf einige weitere Control-Zeichen 
und ihre Bedeutung eingehen: 

Da sind zunächst einmal Steuerzeichen 
für die Ein- und Ausgabe: 

Gtrl-H: (—--) Cursor eine Spalte zurück 
Otrl-X: Gesamte eingegebene Zeile lö- 
schen 

Ctrl-S: Stoppen der Ausgabe auf Bild- 
schirm / Drucker 

Ctrl-P: Drucker an/aus (S.O.) 

Es gibt noch einige andere, die aber von 
geringerer Bedeutung sind und deshalb 
hier nicht aufgeführt werden sollen. Um 
die Betrachtung des Ctri-C Befehls kom- 
men wir jedoch nicht herum: 


N" C - Warmstart des CP/M 


Die Eingabe von „TC“ am Beginn einer 
Zeile verursacht — wie auch die Betätigung 
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der Resettaste — einen sogenannten 
Warmstart;, das CP/M-Betriebssystem 
wird neu initialisiert. Im Prinzip bleiben da- 
bei alle Daten im Speicher unversehrt, sie 
sind jedoch im allgemeinen nicht mehr 
„erreichbar“. 

Ein wichtiger Hinweis: Falls bei einem der- 
artigen Warmstart in dem Bootlaufwerk ei- 
ne Diskette mit einer anderen CP/M-Ver- 
sion liegt als zum Beginn Ihrer Arbeit, 
„stürzt das System ab“. Aus diesem 
Grunde sollten Sie dafür sorgen, daß auf 
allen Disketten dieselbe CP/M-Variante 
(z.B. 2.23/60K) vorhanden ist. Zur Erinne- 
rung: Das Betriebssystem wird z.B. mit 
„COPY B:=A:/S“ kopiert. 

Der Ctrl-C Befehl (TC) hat zwei Funk- 
tionen: 

Erstens können Sie damit viele Program- 
me abbrechen (z.B. COPY, FORMAT) und 
auf die CP/M-Kommandoebene (A>) zu- 
rückkehren. Bei Datenverarbeitungspro- 
grammen u.ä. jedoch kann diese Methode 
nicht empfohlen werden, da bei einer der- 
artigen Beendigung oftmals nicht alle Da- 
ten korrekt abgespeichert werden! 
Zweitens müssen Sie immer dann Ctrl-C 
eingeben, wenn Sie mit dem Betriebssy- 
stem arbeiten und Disketten gewechselt 
haben. Tun Sie dies nicht, wird sich der 
Rechner weigern, auf die neu eingelegte 
Disk zu schreiben. Grundsätzlich sollten 
Sie sich auch daran gewöhnen, bei kom- 
merziellen Programmen nur dann Disket- 
ten zu wechseln, wenn der Computer Sie 
dazu auffordert, da Sie sonst wirklich in 
„Teufel’s Küche“ kommen können. (Der 
Autor dieses Artikels verdankt einem ver- 
gessenen RESET-Befehl im CP/M-MBA- 
SIC — entspricht dem „TC“ in CP/M - 
den Verlust einer Stunde Programmierar- 
beit!) 

Auch nach einer Fehlermeldung des 
CP/M-Systems (BDOS ERR ON X:) soll- 
ten Sie mit „TC“ den Rechner neu 
starten. 

Lassen Sie uns zum Abschluß dieses Ab- 
schnittes über die eingebauten Komman- 
dos noch kurz auf eben diese Fehlermel- 
dungen eingehen. Es gibt insgesamt nur 
drei verschiedene: 

BAD SECTOR - deutet auf eine beschä- 
digte oder nicht formatierte Diskette hin (s. 
FORMAT); 

R/O - (Read Only/ Nur schreiben) besagt, 
daß die eingelegte Disk entweder schreib- 
geschützt ist (Schreibschutzaufkleber ent- 
fernen!) oder neu eingelegt wurde, ohne 
„1 0“ einzugegeben; 

SELECT - schließlich gibt an, daß ein an- 
gesprochenes Laufwerk nicht vorhanden 
ist. 
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Weitere Utilities 


Kehren wir nun wieder zu den Utilities 
zurück. Zwei dieser Hilfsprogramme wol- 
len wir noch näher unter die Lupe neh- 
men. Da ist zum einen „STAT“, mit des- 
sen Hilfe sich der Benutzer Informationen 
über Ein- und Ausgabeeinheiten sowie 
Dateien geben lassen kann. Nur die letzte- 
re Möglichkeit soll hier vorgestellt werden: 


STAT - „Statistische Daten“ 

Der Befehl „STAT <RETURN>" zeigt den 
Status der eingelegten Disketten — „R/O“ 
steht für schreibgeschützt, „R/W“ heißt 
„Schreiben und Lesen“ — sowie den 
freien Speicherplatz in Kilobytes an. Gibt 
man dagegen z.B. „STAT B: <RE- 
TURN>" ein, erhält man nur die Informa- 
tion über den verfügbaren Speicherraum 
auf der angesprochenen Disk (hier Drive 
B:). 


Wenn man Genaueres über einzelne Da- 
teien wissen will, bietet sich der Aufruf 
„STAT filename.typ“ an. So erhält man mit 
„STAT COPY.COM“ u.a. Angaben über 
die Länge des COPY-Programms. Das 
STAT-Programm erlaubt es übrigens, die 
oben genannten Wildcard-Characters zu 
benutzen. So listet der Befehl „STAT 
B:*.* <RETURN>" Informationen über 
alle auf der Disk B: enthaltenen Files auf. 
Wenn Sie sich diese Tabelle näher anse- 
hen, werden Sie auch die Spalte ACCess 
(engl.: Zugriff) bemerken. Sie gibt an, ob 
eine Datei nur gelesen (R/O) oder auch 
überschrieben werden darf (R/W). CP/M 
bietet damit eine Möglichkeit, ein verse- 
hentliches Löschen von Daten zu verhin- 
dern. „Eingeschaltet“ wird dieser Schutz 
mit dem Befehl „STAT filename.filetyp $R/ 
O“, die Rücksetzung erfolgt mit „STAT 
filename.filetyp $R/W“. Die Eingabe von 
„STAT TEST.* $R/O“ bewirkt also die Si- 
cherung aller Files, deren Name „TEST“ 
ist (also z.B. TEST.COM, TEST.TEXT), ge- 
gen Überschreiben. 


PIP - Kopieren von Dateien 

PIP ist eine Abkürzung für Peripheral Inter- 
change Program. Dieses Programm bietet 
zahlreiche Möglichkeiten, Dateien zu 
transferieren und zu verändern. Umge- 
kehrt proportional dazu ist seine Bedie- 
nungsfreundlichkeit. Wir wollen uns des- 
wegen lediglich mit der Aufgabenstellung 
befassen, die in der Praxis am häufigsten 
vorkommt, dem Kopieren von Dateien von 
einer Diskette zur anderen: 


PM 


Die Lösung dieses simplen Problems in- 
des ist unter CP/M nicht frei von Tücken: 


Lädt man nämlich PIP von der Masterdisk 
und legt danach die Disketten ein, die man 
zum Kopiervorgang benötigt, müßte man 
eigentlich mit „TC“ einen Warmstart 
durchführen, um den Spielregeln von 
CP/M zu genügen (s.o.: Warmstart/Dis- 
kettenwechsel). Dies aber würde zum Ab- 
bruch des Kopierprogramms führen. 

Es gibt zwei Methoden, um diese Schwie- 
rigkeiten zu umgehen: 


Ersten können Sie dafür sorgen, daß ent- 
weder auf der Original- oder Quellendis- 
kette das PIP-Programm vorhanden ist, da 
dann ein etwaiger Diskettenwechsel ent- 
fällt. Dazu muß es sich selbst kopieren, 
z.B. mit der Anweisung „PIP B:=A:PIP- 
.COM <RETURN>". Durch diesen Befehl 
überträgt sich das auf der Disk A: befindli- 
che PIP-Programm selbst auf die Disk B:. 
Der zweite Weg ist weniger kompliziert, 
unterwirft Sie aber gewissen Beschrän- 
Kungen: Sie betätigen „TC“ und starten 
dann PIP nach untenstehender Anleitung. 
Entnehmen Sie die Masterdisk mit dem 
Kopierprogramm und legen Sie in dassel- 
be Laufwerk Ihre Originaldisk, von der Sie 
kopieren wollen, ein. PIP wird nun ein- 
wandfrei arbeiten, solange Sie nicht versu- 
chen, auch auf die Originaldisk zu schrei- 
ben. Sie können also nur Daten in einer 
Richtung übertragen. 


PIP wird aktiviert durch die Anweisung 
„PIP <RETURN>" und meldet sich mit 
einem „x“ am linken Bildschirmrand. Die 
allgemeine Form des Kopierbefehls lautet 
„Ziellaufwerk:=Originallaufwerk:Filena- 
me.Filetyp“. Beispielsweise überträgt die 
Anweisung „B:=A:COPY.COM <RE- 
TURN>" das Programm „COPY“ von der 
Disk A: auf das Laufwerk B:. Will man 
mehrere Dateien gleichzeitig ansprechen, 
kann man auch hier die Wildcards verwen- 
den. So kopiert „A:=B:x.*“ alle Dateien 
von B: nach A.:. 


Noch drei Anmerkungen zu PIP: 


1. Das Programm wird durch die Eingabe 
von „TC“ oder <RETURN> verlassen. 


2. Es ist nicht möglich, Daten von einer 
Diskette auf eine andere unter Benutzung 
nur eines Laufwerkes zu übertragen. 


3. Befindet sich auf der Zieldiskette bereits 
eine Datei gleichen Namens, die nicht 
schreibgeschützt ist, wird sie ohne vorhe- 
rige Warnung überschrieben. 
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CP/M 2.2 Referenztabelle 


@® A. LAUFWERKSBEZEICHNUNGEN 


Laufwerke werden durch einen Buchstaben (A...F) mit nach- 
folgendem Doppelpunkt bezeichnet. Beim APPLE gilt folgende 
Zuordnung: 


A: Slot 6, Drive 1 
B: Slot 6, Drive 2 
C: Slot 5, Drive 1 


@® B. DATEINAMEN 


Filenamen bestehen aus 1 — 8 Buchstaben (fname), einem Punkt 
sowie einer Filetypangabe (ftyp). 


Die Bedeutung einiger Filetypangaben: 


ASC — ASCII-Textfile 

ASM — 808ß-Assemblerquelltext 

BAK — Sicherheitskopie eines Files (z.B. von WS erzeugt) 
BAS — BASIC-Programmdatei 

COM — Direkt ausführbares Programm 

DOC, TXT, TEX, READ.ME — Textdateien 

LIB — Library-Datei 

PAS — Pascal-Programmdatei (z.B. TURBO-Pascal) 

PRN — Assemblerlisting 

$$$ — Unvollständige Files, Arbeitsdateien (WS) usw. 


Filenamen können mit einem Laufwerkskenner d: verbunden 
werden, um Bezug auf ein bestimmtes Laufwerk zu nehmen. 


Bsp.: A:COPY.COM, B:INFO.TXT, C:DEMO.DAT 


Einige CP/M-Kommandos erlauben den Einsatz sog. 
"WILDCARDsS", um mehrere Files gleichzeitig anzusprechen. 


* — ersetzt fname oder ftyp (*.COM, *.*, TEXT.x) 
? — ersetzt einzelne Buchstaben (TEST????.TXT) 


® C. ”"BUILD-IN”-KOMMANDOS 


"Eingebaute" Kommandos sind ständig verfügbar. Alle Ein- 
gaben sind mit <RETURN> abzuschließen. 

(Ausnahme Control-Zeichen) 

@® C1. Bezugslaufwerkswechsel (logged Drive) 

<d:> — wechselt auf Drive d: 

@® C2. TC — Warnmstart 


TC (Ctrl-C) — initialisiert CP/M neu. 


TC bricht u.U. laufende Programme ab und muß unbedingt bei 
Diskettenwechsel auf Betriebssystemebene eingegeben werden. 


@® C3. Ein-/ Ausgabe-Control-Zeichen 


!X — Zeile löschen 
TH (<-) letztes Zeichen löschen 


18 — Ausgabe stoppen 


!P — Drucker an/aus 

@® C4. DIR — Anzeige des Inhaltsverzeichnisses 

DIR — Anzeige des DIRectories im Bezugslaufwerk 
DIR da: — dasselbe, nur für Laufwerk d: (z.B.: DIRA:) 


DIR fname.typ — Anzeige nur bestimmter Namen/ Typen 


Bsp.: DIR A:x.COM 


@ C5. ERA — Löschen von Dateien 


ERA d:fname.ftyp — Löschen der Datei fname.ftyp in Drive d: 
Wildcards erlaubt (ERA x*.COM). 


@ C6. REN — Neubenennen von Dateien 


REN d:neuerfname.ftyp = d:alterfname. ftyp — 
Datei alterfname.ftyp in Drive d: wird in 
neuerfname.ftyp umbenannt. 

Wildcards sind nicht erlaubt. 


@® C7. USER — Umschalten der Benutzerbereiche 


USER n — Schaltet auf Benutzerbereich n (1...15) um. Nach 
Booten ist Userbereich ® eingeschaltet. 


@® C3. TYPE — Ausgabe einer Datei am Bildschirm / Drucker 


TYPE d:fname. ftyp — Listet eine Datei am Bildschirm oder 
auf dem Drucker (TYPE READ.ME). 


® D. "TRANSIENTE” KOMMANDOS 


Zur Ausführung eines "transienten" Kommandos muß ein ent- 
sprechender File (ftyp: .COM) auf dem Bezugslaufwerk vor- 
handen sein. 


® D1l. COPY — Kopieren ganzer Disketten 
COPY neuerd:=alterd: — Kopiert gesamte Diskette von Drive 
alterd: nach neuerd:. 


COPY neuerd:=alterd: /S — Kopiert nur das 
CP/M-Betriebssystem 


Je nach Version des COPY-Programms kann eine vorherige 
Formatierung notwendig sein. 


@ D2. FORMAT — Formatieren von Disketten 
FORMAT d: — Formatiert Diskette in Drive d: 
@ D3. STAT — "Statistische" Angaben 
STAT d: — Zeigt freien Speicherplatz auf 

Disk d: an. 

— Zeigt Länge und Status der Datei 
fname. ftyp an. Wildcards erlaubt. 
STAT d:fn.typ $stat — Setzt angesprochene Datei auf Status 

stat: 


stat = R/O ; Datei schreibgeschützt 
R/W ; Datei nicht schreibgesch. 


STAT d: fname. ftyp 


@ DA. PIP — Kopieren von Dateien 


PIP zield:=origd: fname. ftyp — Kopiert Datei fname.ftyp von 
Laufwerk origd: nach zield:. 
Wildcards erlaubt. 


Weitere Aufrufmöglichkeiten der vorgenannten Befehle sowie 
Angaben über andere CP/M 2.2 Anweisungen entnehmen Sie bitte 
den entsprechenden Handbüchern. 
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Teil 3: Die Ein- und Ausgabe 


6. EIN-/AUSGABEBEFEHLE 


Nachdem im letzten Teil Funktionen erklärt 
wurden, die mit der Ein-/Ausgabe im Zu- 
sammenhang standen, werden nachfol- 
gend die entsprechenden Befehle vorge- 
stellt. 

Es gibt wie im Applesoft-Basic Befehle, 
die nur eine Datei ansprechen (z.B. den 
Bildschirm), und solche Befehle, mit de- 
nen verschiedene Dateien bearbeitet wer- 
den können (z.B. der Befehl „OPEN“). 


6.1. Tastatur 


Es gibt zwei Befehle, die von der Tastatur 
Zeichen einlesen: 

INPUT; “String“; Variablenliste — Es 
wird wie beim Applesoft-Basic eine Liste 
von Variablen eingelesen. Falls im Befehl 
ein String angegeben ist, wird dieser aus- 
gegeben, anschließend ein Fragezeichen. 
Soll das Fragezeichen unterdrückt wer- 
den, so kann nach dem String auch ein 
Komma stehen. Der Befehl 

INPUT “Name: “, N$ 

gibt also nur den String “Name: “ ohne ein 
Fragezeichen aus. Falls direkt nach dem 
Wort „INPUT“ ein Strichpunkt steht, dann 
wird nach der Eingabe der Variablen kein 
Return ausgegeben. Man kann dann also 
direkt hinter der Eingabe weiter aus- 
drucken. 

LINE INPUT; “String“; Stringvariable — 
Mit diesem Befehl wird eine Stringvariable 
eingelesen. Es wird zunächst der im Be- 
fehl angegebene String ohne ein nachfol- 
gendes Fragezeichen ausgegeben. Dieser 
String kann auch weggelassen werden. 
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Anschließend werden alle Zeichen bis zu 
der Return-Taste in die Stringvariable ein- 
gelesen, mit Kommas und allen Sonder- 
zeichen. Falls direkt nach dem Wort 
„LINE INPUT“ ein Strichpunkt folgt, dann 
wird wie beim „INPUT“ nach der Eingabe 
kein Return ausgegeben. 


6.2. Lautsprecher 


BEEP - Der Lautsprecher piepst einmal. 
Denselben Effekt erreicht man durch den 
Befehl „PRINT CHR$ (7);“ 









e Mecki u 





von Pit Capitain 


Obwohl der Macintosh drei Software-Ton- 
generatoren eingebaut hat, ist dies der 
einzige Basic-Befehl zur Tonerzeugung. 
Die Tongeneratoren können leider nur 
über Maschinensprache benutzt werden. 


6.3. Bildschirm 


CLS - löscht das Ausgabefenster. Dies 
entspricht dem Applesoft-Befehl 
„HOME“. 

PRINT Liste von Ausdrücken — ent- 
spricht dem Applesoft-Befehl „PRINT“. 


Abb. 1 
% File Edit Control : 
nn 
ie List 
la eh ce ; HIOREM Formatierte Aussabe 
| Hallla) | HII REM 
41,Hallo, (3), | B100CL3: READF$ 
ı 8110 WHILE Fio"E" 
au an | 1120 PRINT USING F$, "1": "Hallo"; "(3 
Ir 8! 8- 200 Bi 3 BRan Ft 
es, ID F- 57 SHOT. 00, | Hisö WEND. PRINT 
ILEoPY ‚ 1150 READF$ : WHILE Ff«"E' 
k ill) PRINT WSING EL, 13% -75, 1000 
| H170 BEADFE 
| E130 WEND . END 
| „oo a 
ı BE 10 DATA "wer see tee, 8 
| 220 DATA "tes se" °P" 
| 
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Unterschiede gibt es nur bei der Ausgabe 
von Zahlen: Nach Zahlen wird grundsätz- 
lich ein Leerzeichen ausgegeben, desglei- 
chen vor positiven Zahlen. Vor negativen 
Zahlen steht ein Minuszeichen. Einfach 
genaue Zahlen (vol. Teil 1 der Serie), die 
mit weniger als 8 Ziffern dargestellt wer- 
den können, werden ohne Hochzahl aus- 
gegeben, z.B. wird 1E-7 als „.0000001 “ 
ausgegeben (7 Ziffern), dagegen 1E-8 als 
„ıE-08°. Analoges gilt für doppelt genaue 
Zahlen. Hier liegt die Grenze bei 17 Zif- 
fern. 


SPC (I) - gibt | Leerzeichen aus. | muß im 
Bereich -32768 bis 32767 liegen, wobei 
negative Zahlen natürlich kein Leerzei- 
chen erzeugen. Dieser Befehl kann nur in 
einem „PRINT“- oder „LPRINT“-Befehl 
(s.u.) benutzt werden. 

Falls die Zeilenlänge des Bildschirms mit 
dem Befehl „WIDTH“ (s.u.) auf W gesetzt 
wurde, werden nur | MOD W Leerzeichen 
ausgegeben. 

Ansonsten (Zeilenlänge auf „unendlich“ ) 
wird beim ersten Erreichen der Position 
255 durch den „SPC“-Befehl ein Return 
eingefügt! Dies steht im Widerspruch zu 
den Angaben im Handbuch. 


TAB (I) -— bewegt den Ausgabezeiger zur 
horizontalen Position I. Falls sich der Aus- 
gabezeiger schon hinter dieser Position 
befindet, wird zu dieser Position in der 
nächsten Zeile gesprungen. | muß im Be- 
reich von -32768 bis 32767 liegen (negati- 
ve Werte entsprechen der Position ganz 
links). Dieser Befehl kann nur in einem 
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100. CL3 : WIDTH 25,7 : N$="Test-Datei’ 
200 PRINT "Öffnen" : OPEN "Cut", #1, N$ 
2 10 FOR I= | TO 10 

720 ARITE*L LT sıRun, I 


| 
| 

ZAOLLOSE* 1 : PRINT Schreiben beendel Be 
300 PRINT "Öffnen" : OPEN NE FOR INPUT AS#I | $ 
‚10 F=0 : WHILE NOT EOF (1) ih 
INPUT *1, 4. a8. 0 
PRINT &, 48,0 
IF STRYLASAS OR AtaAoQ THEN F=F+1 


360 CLOSE #1 : PRINT "Lesen ": u 
370 IE FTHEN PRINT "mit * FELSE PRINT "ohne" |: 
230 PRINT "Fehler beendet" : END 
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„PRINT“- oder einem „LPRINT“-Befehl 
(s.u.) verwendet werden. Auch hier wird 
bei einer Zeilenlänge von W Zeichen nur 
zur Position |IMOD W gesprungen. 


PTAB (Il) - bewegt den Ausgabezeiger 
zum |I-ten Pixel (= einzelner Punkt des 
Grafik-Bildschirms). Falls sich der Ausga- 
bezeiger schon hinter dieser Position be- 
findet, so wird — im Unterschied zum Be- 
fehl „TAB“ - zu der Position in derselben 
Zeile zurückgesprungen. | muß im Bereich 
von O bis 32767 liegen. Dieser Befehl 
kann nur in einem „PRINT“-Befehl ver- 
wendet werden. 


PRINT USING F$; Liste von Ausdrük- 
ken - gibt die Zahlen und Strings in der 
angegebenen Liste in einem bestimmten 
Format aus. Dieses Format wird durch den 
ersten String F$ festgelegt. Dieser String 
enthält bestimmte Zeichen, die das Aus- 
gabeformat bestimmen. Es gibt folgende 
Zeichen: 


Zur Formatierung von Strings: 

I! - Nur das erste Zeichen eines Strings 
wird ausgegeben. 

\n Leerzeichen\ — Es werden 2 + n 
Zeichen eines Strings ausgegeben. Falls 
der String zu kurz ist, werden Leerzeichen 
ergänzt. 

& — Der String wird unverändert ausge- 
geben. 


Zur Formatierung von Zahlen: 
+ - stellt eine Ziffer dar. Falls die Zahl 
weniger Ziffern als gefordert hat, so wer- 


Abb. 2 
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den vorne Leerzeichen ergänzt. Falls die 
Zahl aber zu lang ist, so wird vor der Zahl 
ein „%“ ausgegeben. Zwischen den Zif- 
fer-Zeichen kann ein Dezimalpunkt (,,.”) 
angegeben werden. 

+ - am Anfang bzw. am Ende des Forma- 
tier-Strings bedeutet, daß das Vorzeichen 
einer Zahl (+ oder -) vor bzw. hinter der 
Zahl ausgegeben wird. 

-- am Ende des Formatier-Strings bedeu- 
tet, daß negative Zahlen von einem Minus- 
zeichen gefolgt werden. 

** — am Anfang des Formatier-Strings be- 
deutet, daß bei Zahlen, die weniger Ziffern 
als gefordert haben, Sternchen („x“) an- 
statt Leerzeichen ergänzt werden. 

$$ — Ein Dollar-Zeichen wird vor den for- 
matierten Zahlen ausgegeben. 

**$ — Die beiden eben beschriebenen 
Wirkungen werden kombiniert. 

‚— direkt vor einem Dezimalpunkt bewirkt, 
daß nach Tausender-, Millionen-Ziffern 
usw. ein Komma ausgegeben wird (ameri- 
Kanische Notation). 

1771 - am Ende einer Ziffernfolge be- 
wirkt, daß eine Zahl im exponentiellen For- 
mat ausgegeben wird. Die vier Pfeile ste- 
hen für die vier Zeichen “E+xx“, mit de- 
nen der Exponent angegeben wird. 

_ — bewirkt, daß das nächste Zeichen des 
Formatier-Strings direkt ausgegeben wird. 
Beispiele für manche der vielen Formatier- 
Zeichen findet man in der Abb. 1. 


WRITE Liste von Ausdrücken - ähnlich 
wie der Befehl „PRINT“. Die einzelnen 
Ausdrücke werden aber durch Kommas 
getrennt ausgegeben. Strings werden in 
Anführungszeichen eingeschlossen. Vor 
und nach Zahlen wird im Gegensatz zum 
„PRINT“-Befehl kein Leerzeichen ausge- 
geben. Nach dem letzten Ausdruck wird 
ein Return ausgegeben. Z.B. erzeugt der 
Befehl 

WRITE 1,A$,"Test“,A,-1 

die folgende Ausgabe (mit A$="Hallo”, 
A=27): 

1,"Hallo“,“Test“,27,-1 


LIST Zeile1-Zeile2 — öffnet ein Listfenster 
und gibt das Programmlisting ab der Zeile 
mit der Nummer Zeile! aus. Dies ent- 
spricht fast dem Menü-Befehl „LIST“, der 
jedoch immer den Anfang des Programms 
zeigt. 

Man kann das Listing auch an ein anderes 
Ausgabegerät schicken, indem man an 
den Befehl den Zusatz “, Gerät“ anhängt. 
Der Befehl 

LIST 100-999, "COM1:" 

schickt ein Listing der Programmzeilen 
100 bis 999 an die serielle Schnittstelle. 
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6.4. Drucker 


Es gibt einige Befehle, die direkt den 
Drucker ansteuern, ohne daß wie beim 
Applesoft-Basic eine Datei dafür geöffnet 
werden müßte: 

LCOPY - druckt den augenblicklichen 
Bildschirminhalt auf dem Imagewriter aus. 
Die Abb. 1 wurde mit diesem Befehl er- 
zeugt. 

LPRINT und LPRINT USING -— entspre- 
chen den Befehlen „PRINT“ und „PRINT 
USING“ (s.o.), aber Ausgabe auf dem 
Drucker. 

LLIST Zeilei-Zeile2 — druckt ein Listing 
des im Speicher befindlichen Programms 
mit dem angegebenen Zeilenbereich. Die- 
selbe Wirkung kann man auch mit dem 
Befehl 

LIST Zeile1-Zeile2, “LPT1:" 

erzielen. 


6.5. Allgemeine Dateien 


In diesem Abschnitt werden solche Befeh- 
le erklärt, mit denen unterschiedliche Da- 
teien bearbeitet werden können. Das 
heißt, daß diese Befehle z.B. Dateien auf 
verschiedenen Disketten oder den Bild- 
schirm, den Drucker usw. ansprechen 
können. Die Bezeichnung von Dateien 
und die Namen von Ein-/Ausgabegeräten 
wurden bereits im Teil 1 der Serie behan- 
delt. 


6.5.1. Arten von Dateien 


Es gibt zwei unterschiedliche Arten, eine 
Datei zu benutzen: 

—- man kann entweder Dateien sequentiell 
lesen bzw. beschreiben, d.h. immer ein 
Zeichen nach dem anderen, oder 

—- man kann an ganz bestimmten Stellen 
auf eine Datei zugreifen, ohne eine be- 
stimmte Reihenfolge einhalten zu müssen 
(wahlfreier Zugriff, Random Access). Die 
Datei ist dazu in mehrere gleichlange „Fel- 
der“ aufgeteilt, die numeriert sind. Man 
kann nun wahlweise auf das Feld mit einer 
beliebigen Nummer zugreifen. 

In diesem Zusammenhang spricht man 
dann auch von sequentiellen Dateien bzw. 
von Random-Access-Dateien. Diese Un- 
terscheidung gibt es auch beim Apple- 
DOS. Sie wird bei den nächsten Abschnit- 
ten immer wieder auftauchen. 


6.5.2. Allgemeine Dateibefehle 


Dateien werden mit dem Befehl „OPEN“ 
geöffnet. Diesen Befehl kann man auf zwei 
verschiedene Arten schreiben. Die erste 
Möglichkeit ist: 
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OPEN Modus, #N, Name, Länge - öffnet 

die Datei mit dem angegebenen Namen 

unter der Dateinummer N. Modus ist ein 

String, dessen erster Buchstabe die Art 

der Datei angibt: 

“R“ — Random-Access-Datei, 

Ausgabe 
“|“ — sequentielle Eingabedatei 

“Q“ - sequentielle Ausgabedatei 

“A“ - sequentielle Ausgabedatei. Der Da- 
teizeiger steht aber am Ende der 
Datei. Dadurch wird also an die Da- 
tei etwas angehängt (Append). 

Bei Random-Access-Dateien kann ange- 

geben werden, wie lang die einzelnen Fel- 

der sind. Falls diese Angabe weggelassen 

wird, nimmt das Microsoft-Basic eine Län- 

ge von 128 Bytes an. 

Die zweite Art des „OPEN"-Befehls hat 

eine andere (etwas besser lesbare) 

Syntax: 


Ein- oder 


OPEN Name FOR Modus AS #N LEN- 
=Länge - Die Datei mit dem angegebe- 
nen Namen wird unter der Dateinummer N 
geöffnet. Modus ist eines der folgenden 
Wörter: 


INPUT — sequentielle Eingabedatei 
OUTPUT — sequentielle Ausgabedatei 
APPEND - sequentielle Ausgabedatei. 
Der Dateizeiger steht aber am Ende der 
Datei. 


Falls der Ausdruck „FOR Modus“ wegge- 
lassen wird, handelt es sich um eine Ran- 
dom-Access-Datei. In diesem Fall kann 
die Länge der einzelnen Felder angege- 
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ben werden. Bei fehlender Angabe wird 
die Länge 128 angenommen. 

CLOSE #N1,#N2.,... — schließt die ange- 
gebenen Dateien. Falls keine Dateinum- 
mer angegeben ist, werden alle offenen 
Dateien geschlossen. 


RESET - schließt ebenfalls alle offenen 
Dateien. Der Unterschied zum „CLOSE- 
Befehl besteht darin, daß zusätzlich das 
neue Disketteninhaltsverzeichnis auf Dis- 
Kette geschrieben wird. 

Bei „CLOSE“ wird das Inhaltsverzeichnis 
nur im Speicher auf den neuesten Stand 
gebracht, nicht aber auf der Diskette. Das 
kann bei einem Stromausfall oder z.B. bei 
Maschinensprache-Experimenten die Fol- 
ge haben, daß das Inhaltsverzeichnis einer 
Diskette nicht mit ihrem Inhalt überein- 
stimmt. 

FILES Name - gibt an, ob sich eine Datei 
mit dem angegebenen Namen auf Disket- 
te befindet. In diesem Fall wird der Name 
der Datei im Ausgabefenster angegeben, 
anderenfalls wird die Fehlermeldung 
„FILE NOT FOUND" erzeugt. 

Falls kein Name hinter dem Befehl ange- 
geben ist, werden die Namen von allen auf 
Diskette befindlichen Dateien im Ausga- 
befenster ausgegeben. 

KILL Name -— löscht die angegebene 
Datei. 

NAME Alt AS Neu — Ändert den Namen 
einer Disketten-Datei. Der alte Name muß 
existieren, der neue Name darf nicht 
schon einmal vorkommen, ansonsten wird 
ein Fehler erzeugt. 
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Bei Random-Access-Dateien besteht die 
Möglichkeit, die Felder, in die die Datei 
aufgeteilt ist, zu „formatieren“. Dies geht 
mit dem folgenden Befehl: 

FIELD #N, B1 AS S1$, B2 AS S2$, ... - 
Dieser Befehl formatiert die Felder einer 
geöffneten Datei (Nummer N) wie folgt: 
Die ersten Bi Zeichen können unter dem 
Namen S1$ bearbeitet werden, die näch- 
sten B2 Zeichen unter dem Namen S2$, 
USW. 

Beispiele für die Verwendung dieser Be- 
fehle sieht man in Abb. 2 und Abb. 3. 
Diese Programme schreiben zunächst 
Zahlen und Strings auf eine Datei. Danach 
wird die Datei wieder gelesen und die 
Daten werden auf ihre Korrektheit hin 
überprüft. In Abb. 2 wird eine sequentielle 
Datei, in Abb. 3 eine Random-Access- 
Datei verwendet. 


6.5.3. Eingabe 


INPUT #N, Variablenliste — liest die an- 
gegebenen Variablen von der geöffneten 
Datei mit der Nummer N ein. 

LINE INPUT #N, Stringvariable - liest 
eine Zeile von der Datei mit der Nummer N 
in die angegebene Stringvariable ein (wie 
bei dem Befehl „LINE INPUT“, s.o.). Dies 
kann z.B. dazu benutzt werden, um ein im 
ASCII-Format gespeichertes Basic-Pro- 
gramm von einem anderen Programm aus 
einzulesen. 

GET #N, R - liest das Feld Nummer R von 
der Random-Access-Datei mit der Num- 
mer N in den Speicher. Falls R nicht ange- 
geben ist, wird das nächste Feld (nach 
dem letzten „GET“) eingelesen. Nach die- 
sem Befehl können u.a. mit den beiden 
vorigen Befehlen Daten aus dem Feldein- 
gelesen werden, aber auch über die 
Stringvariablen in einem „FIELD“-Befenhl. 
Beispiele zu diesen Befehlen sieht man in 
den Abb. 2 und 3. 


6.5.4. Ausgabe 


WIDTH Gerät, W, T oder 

WIDTH +#N, W, T - legt die Zeilenlänge 
und Tabulator-Positionen des Ausgabege- 
rätes bzw. der Ausgabedatei fest. 

W ist die Länge der Zeilen. Nach W Zei- 
chen fügt Microsoft-Basic ein Return ein. 
Falls W den Wert 255 hat, so wird die 
Zeilenlänge auf „unendlich“ gesetzt, d.h. 
es wird nirgends innerhalb von Zeilen ein 
Return eingefügt (man beachte aber die 
obige Anmerkung zum Befehl „SPC"). 
Tabulatoren werden alle T Zeichen ge- 
setzt. Zu diesen Marken wird zum Beispiel 
gesprungen, wenn in einer „PRINT”-An- 
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weisung ein Komma zwischen zwei Aus- 
drücken steht, also beispielsweise bei 
PRINT A, B,. 


PRINT #+N, Ausdrücke - entspricht 
„PRINT“, wobei aber auf die Datei mit der 
Nummer N geschrieben wird. 

PRINT #N, USING F$; Ausdrücke — wie 
„PRINT USING F$“; es wird aber auf die 
Datei mit der Nummer N geschrieben. 
WRITE #N, Ausdrücke - wie „WRITE“; 
es wird aber auf die Datei mit der Nummer 
N geschrieben. Dies ist recht nützlich, da 
die Ausdrücke, die dadurch auf die Datei 
geschrieben werden, später mit dem „IN- 
PUT #"-Befehl wieder eingelesen werden 
können, da sie schon voneinander durch 
Kommas usw. getrennt sind. 


Für Random-Access-Dateien gibt es noch 
mehr Befehle: 

PUT #N, R - Gegenstück zum „GET #"- 
Befehl (s.o.). Es wird also ein Feld, das 
vorher mit „PRINT #“, „WRITE #* oder 
mit den beiden nachfolgenden Befehlen 
gefüllt wurde, auf die Datei mit der Num- 
mer N geschrieben, und zwar an die Stelle 
mit der Nummer R. 

LSET S$ = Stringausdruck und 

RSET S$ = Stringausdruck - setzt den 
angegebenen Stringausdruck in das Feld 
einer Random-Access-Datei ein, und zwar 
an der Stelle, die in einem „FIELD“-Befehl 
(s.o.) der Variablen S$ zugeordnet wurde. 
Mit „LSET“ wird der Stringausdruck links- 
bündig, mit „RSET“ rechtsbündig einge- 
setzt, wobei eventuell Leerzeichen er- 
gänzt werden. Dies kann auch unabhängig 
von Dateien benutzt werden, z.B.: 
A$=SPACE$(20) : RSET A$=N$ 

Diese beiden Befehle haben zur Folge, 
daß in dem String A$ (durch den ersten 
Befehl 20 Zeichen lang) der String N$ 
rechtsbündig eingefügt wird (zweiter Be- 
fehl). 

Falls man nicht Strings, sondern Zahlen in 
ein formatiertes Feld einsetzen will, muß 
man die Funktionen „CVI", „CVS“, 
„CVD“, „MKI$“, „MKS$“ oder „MKD$“ 
verwenden (s. Teil 2 der Serie). 

Beispiele zu diesen Befehlen sind in den 
Abb. 2 und 3 zu sehen. 

Um das im Speicher befindliche Pro- 
gramm auf eine Datei zu schreiben, gibt es 
noch den Befehl 

SAVE Name - schreibt das Programm aus 
dem Speicher auf die Datei mit dem ange- 
gebenen Namen, und zwar im binären 
Format. 

Um das Format zu ändern, können an den 
Befehl noch die folgenden Zusätze ange- 
hängt werden: 


‚A- ASCII-Format 

‚P- geschütztes Format (Protected). 
SAVE “Prog1“,A speichert also das Pro- 
gramm unter dem Namen “Progi1“ im 
ASCII-Format ab. 

Falls kein Name angegeben wird, so er- 
scheint ein Dialogfenster, in dem der Be- 
nutzer den Dateinamen und das Format 
festlegen kann (s. Teil 1 der Serie). 


Redaktioneller Hinweis: Inzwischen ist 
die Version 2.0 Microsoft-Basic bei uns 
eingegangen. Da diese Neuversion stark 
geändert wurde (Full-Screen-Editor, Zei- 
lennummern fakultativ usw.), standen wir 
vor dem Problem, ob wir die bereits vorlie- 
gende Serie zur Version 1.0 bzw. 1.1 ab- 
schließen sollten. Um Verwirrungen zu 
vermeiden, haben wir uns dazu entschlos- 
sen, die Aufsatzfolge in der bisherigen 
Form zu Ende zu führen. Da der Macintosh 
leider noch nicht völlig „ausgegoren“ ist, 
werden sich Mac-Besitzer daran gewöh- 
nen müssen, daß an den Mac-Program- 
men ständig gefeilt wird. Der Umstand, 
daß selbst ein so weltweit renommiertes 
Software-Haus wie Microsoft mit der Im- 
plementierung von Basic und Multiplan auf 
dem Mac sichtliche Schwierigkeiten hatte, 
laßt erahnen, wie es erst den kleineren 
Software-Häusern mit diesem eigenwilli- 
gen Gerät ergehen wird. Wer einen Macin- 
tosh erwirbt, muß wissen, daß von be- 
stimmten Programmen in kürzeren Ab- 
standen, als dies bei anderen Computern 
der Fall ist, Neuversionen erscheinen wer- 
den. Wem dies zu teuer ist, muß bei einer 
Altversion bleiben, so daß die Fortführung 
der Serie von daher ihre Berechtigung hat. 
In den USA kostet der Umtausch von Mi- 
crosoft-Basic ca. $ 50.00. 


4 
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Zukunft 


Orgasoft wurde 1980 als GmbH gegrün- 
det, deren beide Gesellschafter Klaus M. 
Dargel und Jürgen Hartwich mit je 50 % 
beteiligt sind. Der Vorläufer der Firma wur- 
de im Jahre 1977 durch Jürgen Hartwich 
ins Leben gerufen, und zwar als Bera- 
tungsfirma für Materialfluß und Büroorga- 
nisation. | 

Seit 1980 ist Orgasoft Apple-Vertrags- 
händler. Im Jahr 1984 wurde zusätzlich 
der Mikrocomputer Schneider CPC 464 
ins Programm aufgenommen, um die Pro- 
duktpalette nach unten abzurunden. Der 
Firmensitz ist in 7732 Niedereschach. Ein 
Verkaufsbüro befand sich seit 1. 1. 1983 in 
7730 Villingen-Schwenningen. 


Ladengeschäft: Jetzt am 23. Februar 
wurde dann das neue Verkaufsbüro in der 
Villinger Innenstadt mit angeschlossenem 
Computer-Shop eröffnet. Auf 150 qm Bü- 
ro- und Ladenfläche wird die gesamte Ap- 
ple-Produktpalette, der Schneider CPC 
464 und ein umfangreiches Peripherie- 
Angebot von Plattenspeichern, Druckern 
usw. geführt. Orgasoft ist ein Level-1-Ser- 
vice-Center mit eigener Reparatur-Abtei- 
lung und hat 7 Mitarbeiter sowie einige 
freiberufliche Programmierer. In dem re- 
novierten Altstadthaus werden in einer ge- 
schmackvollen Ladeneinrichtung weiter- 
hin Zubehör sowie ein breites Sortiment 
an Fachbüchern und Fachzeitschriften an- 
geboten. Der Kundenkreis setzt sich aus 
Privatpersonen, Klein- und Mittelbetrie- 
ben, Schulen und einigen Firmen der 
Großindustrie zusammen. Für das gesam- 
te Produktprogramm von Apple und 
Schneider werden Abdeckhauben in eige- 
ner Regie hergestellt und an Endkunden 
sowie über das Händlernetz vertrieben. 


Exportgeschäft: Nachdem Orgasoft sich 
schon seit 3 Jahren mit dem Export nach 
Tunesien befaßt und dort bereits zahlrei- 
che Firmen mit Apple-Computern sowie 
mit französischsprachiger Software aus- 
gestattet hat, ist man derzeit dabei, eine 
„Orgasoft Tunisie“ zu gründen. Für den 
Export ist Geschäftsführer Jürgen Hart- 
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Orgasoft plant für die 


wich zuständig. U.a. wurden die deut- 
schen Auslandshandelskammern in Tune- 
sien und Ecuador mit Apple-Rechnern und 
spezieller Software ausgestattet. 


Software-Entwicklung: Die Firma Orga- 

soft gehört zu den ganz wenigen Apple- 

Händlern mit einer eigenen Software-Ab- 

teilung, die Eigenentwicklungen und kun- 

denspezifische Programme für Apple- 

Computer erstellt. Ca. 80 % der vertriebe- 

nen Software sind Eigenprodukte. Von 

einigen Fremdprogrammen wurden Lizen- 

zen erworben. 

Die Firma Orgasoft verfügt inzwischen 

über eine große Software-Palette, die an 

Endabnehmer und über das Händlernetz 

vertrieben wird, z.B. folgende Branchen- 

lösungen: 

— Reisebüro 

— Autovermietung 

— Verwaltung von Palettenlägern 

— Anschluß von Wägesystemen an Apple- 
Computer 

— Lohn und Gehalt 

— Fakturierung 

— Finanzbuchhaltung 

— Immobilienmakler 

— Baukalkulation 

Das Fakturierungsprogramm läßt sich mit 
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dem Applewriter Ile verknüpfen, so daß 
mit den Kundenadressen Serienbriefe er- 
stellt werden können. 





Selbstverständlich wird auch Software der 
großen, internationalen Softwarehäuser 
angeboten. Wie sich anläßlich der Eröff- 
nung des Computer-Shops zeigte, ist Or- 
gasoft immer gut für neue Marketing- 
Ideen. In den regelmäßig erscheinenden 
Orgasoft-News wird das Händlernetz über 
Aktionen, so z.B. über den Software-Kof- 
fer, bestehend aus einem Marken-Akten- 
koffer mit 4 kompletten Programmpaketen 
als Händler-Demo, unterrichtet. Ferner 
werden auch herstellerneutrale Beratun- 
gen auf dem Sektor Materialfluß sowie 
Büroorganisation und EDV-Einführungen 
durchgeführt. 
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Auf dem Abstellgleis: 
Steve Wozniak 


In der amerikanischen Zeitschrift 
„Byte“ erscheint seit Dezember 
1984 eine mehrteilige „Apple Sto- 
ry“ in Form eines Interviews mit 
Steve Wozniak. Obgleich substan- 
tiell nichts Neues gebracht wird, 
denn Apples Aufstieg von der Ga- 
ragenfirma bis zum Weltkonzern ist 
ja wohl jedem bekannt, überra- 
schen doch die resignierenden Tö- 
ne, die Wozniak insbesondere im 
Januar-Heft der „Byte“, S. 167 an- 
schlägt. Insider kann dies aller- 
dings nicht mehr erstaunen, denn 
schon seit langem ist bekannt, daß 
Steve Wozniak nur noch ein Au- 
Benseiter, quasi ein „Odd-man- 
out“ ist, also eine Figur, die nicht 
mehr in das Puzzle paßt. 


— Wäre es nach Wozniak gegan- 
gen, dann würden Apple-Clubs 
wie CALL APPLE in den USA oder 
AUGE in Deutschland nicht von 
Apple ignoriert oder gar mit Füßen 
getreten. 

— Wäre es nach Wozniak gegan- 
gen, dann hätte man beim Apple Ill 
und bei der Lisa weniger Geheim- 
niskrämerei betrieben (und wahr- 
scheinlich wären dann auch beide 
Projekte nicht „in die Hose ge- 
gangen‘). 

— Wäre es nach Wozniak gegan- 
gen, dann hätte man den Quell- 
code der Betriebssysteme SOS 
(für Apple Ill) und ProDOS (für 
Apple Il) publik gemacht. (Woz- 
niak: „It's the greatest thing in the 
world, but | wish we gave out li- 
stings of it ... We made it very 
difficult for outside developers in- 
stead of providing all the informa- 
tion ...“ Byte: „Has that attitude 
changed now?“ Wozniak: „No. It's 
still the most negative thing in our 


whole company, and it will be for 
years.“). 


Bei Apple richtet man sich jedoch 
de facto schon lange nicht mehr 
nach Wozniak. Als ich in Verbin- 
dung mit meinem Buch „Apple 
ProDOS für Aufsteiger“, das übri- 
gens im Mai 1984 noch vor den 
ersten amerikanischen ProDOS- 
Publikationen erschien, einen dis- 
assemblierten Quellcode von 
ProDOS ankündigte, erhielt ich so- 
fort eine Abmahnung der Rechts- 
anwaltskanzlei Strobl, Killius & 
Vorbrugg in München, die die Fir- 
ma Apple Computer GmbH mit der 
klaren Order vertritt, jeden abzu- 
mahnen, der in einen Apfel beißt, 
egal ob frisch oder faul. Daß der 
ProDOS-Quellcode letztlich nicht 
erschien, lag indes weniger an der 
Einschüchterung denn an meiner 
zu knapp bemessenen Freizeit, 
denn ein kommentierter Objekt- 
code ist genauso rechtens wie ein 
kommentiertes Gedicht, und in 
beiden Fällen darf übrigens das 
Original als Großzitat mitgeliefert 
werden, wie bereits jedem Schul- 
buben aus seinen Deutschbüchern 
bekannt ist. Soeben erschien im 
Franzis-Verag ein DOS-Buch 
(Ruhland, „DOS 3.3“), das den 
gesamten Objektcode („Großzi- 
tat“) enthält; eine Abmahnung ist 
damit praktisch vorprogrammiert. 
Vergleicht man Wozniaks obigen 
Wunsch mit der heutigen Einstel- 
lung der Firma Apple, dann sieht 
man deutlich, daß inzwischen ganz 
andere Strömungen dominieren. 
Wozniak ist längst ausgebootet: 
„Woz is out. Poor Woz. That's the 
way the cookie crumbies.“ 

Ulrich Stiehl 





AUGE und Apple-München 


Die Apple User Group Europe e.V. 
(AUGE) befindet sich seit gerau- 
mer Zeit in einer Krise, wobei die 
Fluktuation im Vereinsvorstand iro- 
nischerweise eher Wirkung denn 
Ursache der Misere ist, die wohl 
letztlich durch eine im Hintergrund 
agierende „zweite Führungsgar- 
de“ („Background-Mafia“) bedingt 
ist. 

Die auf die Gründungsphase unter 
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Regie von Wolfgang Dederichs fol- 
gende Expansionsära bis 1973 un- 
ter dem Vorsitzenden Klaus Giese 
stellt meines Erachtens die frucht- 
barste Periode der AUGE dar. In- 
folge permanenter, vereinsinterner 
Querelen ging es danach rapide 
bergab. Zunächst wurde im März 
1983 Klaus-Peter Lucius zum Vor- 
sitzenden gewählt, der jedoch be- 
reits nach 5 Monaten seinen „Hut 


nahm“. Auf der nächsten Haupt- 
versammlung wurde Peter Derks 
im März 1984 zum Vorsitzenden 
erkoren, der ebenfalls nach kurzer 
Zeit im Juli 1984 „abdankte“. Die 
„Interregnen“ waren durch ver- 
waiste „Hutständer“ auf der einen 
und Vereinsnörgeleien auf der an- 
deren Seite gekennzeichnet. Als 
dann unser „Peeker“ und kurz da- 
nach „Apple’s unabhängiges Ma- 
gazin“ erschienen, machte sich 
nervöse Hektik breit. Um eine Ab- 
trift der Mitarbeiter des User-Ma- 
gazins zu verhindern, wurde eine 
großzügige Entlonnung vom 
„kopflosen“ Vorstand bewilligt, 
obgleich noch vor kurzem (Heft 3/ 
1984, S. 9) sowie in früheren User- 
Magazinen (z.B. Heft 2/1982, S. 2) 
Bezahlungen aus idealistischen 
Gründen kategorisch abgelehnt 
wurden. Den ab 1985 auf DM 
100,- erhöhten Jahresbeitrag wird 
man denn auch bitter nötig haben, 
da der halbe Vereinsetat jetzt 
durch Zahlungen an „ehrenamtli- 
che“ Mitarbeiter verschlungen 
werden dürfte, so daß eine weitere 
Jahresbeitragserhöhung praktisch 
vorprogrammiert ist. Um dem be- 
reits einsetzenden Strom der Aus- 
tretenden zu begegnen, wurde im 
Dezember (Heft 8/1984, S. 7) ver- 
kündet: „Wer bis zum 31.12.84 
seinen Austritt rückgängig macht, 
braucht keine neue Aufnahmege- 
bühr zu zahlen.“ 

Da die Firma Apple die Existenz 
der AUGE („Kopierverein“) völlig 
ignoriert und nunmehr sogar einen 
eigenen Apple-Club („Schweige- 
verein“) plant, geht die AUGE jetzt 
im User-Magazin aufs Ganze: 
Manfred Schürmann alias Key B. 
Hacker alias Macintosh-Frustrierter 
löste Wolfgang Gohe als farblosen 
Leiter der Macintosh-Arbeitsge- 
meinschaft ab und avancierte zum 
Protagonisten eines knallharten 
Kurses (s. User-Magazin, Heft 2/ 
1985, S. 5ff.). Während „Apple’s 
unabhängiges Magazin“ als „Po- 
tenzierung von Seichtheiten der 
Vorbeterindustrie“ abgestempelt 
wird, bleibt unser „Peeker“ einst- 
weilen ungeschoren, obwohl oder 
gerade weil Schürmann in allen 
denkbaren Kombinationen 
„peekt“ („anpeeken“, „erpee- 
ken“ usw.). In seinem furiosen 
Aufsatz „Lieber der Fall als der 
Kniefall“ versteigt er sich in For- 
mulierungen, wie man sie bei Ap- 
ple in München bislang noch nicht 
vernommen haben dürfte: „Profit, 
Profit und nochmals Profit. Und 
den macht Apple reichlich, um sich 
den Schaum zu leisten, mit dem 


immer wieder neue Kunden einge- 
seift werden ... Außer den stolzen 
Gewinnen verbirgt Apple so gut 
wie alles, was jede ordentliche Fir- 
ma sonst an Informationen auf den 
Tisch legt ... Wer den Mund so voll 
nimmt, muß auch was drin haben 
außer warmer Luft“. In seinem 
Diskurs hebt Schürmann immer 
wieder darauf ab, daß sich die Ap- 
ple-Niederlasssung in München 
völlig eingeigelt hat und jeden 
Kontakt mit der Außenwelt panisch 
meidet. Wird sich Apple-München 
durch solche Kritik ändern lassen? 
Wohl kaum, denn Apple-München 
ist lediglich der verlängerte Arm 
von Apple-Cupertino, und wenn 
Cupertino in Verkennung des spe- 
zifischen, bundesdeutschen Mi- 
krocomputermarktes „No, no“ 
sagt, dann kann München nicht 
„Doch, doch“ sagen. Wie bei der 
AUGE ist auch bei Apple-München 
das Phänomen der Personalfluk- 
tuation (seit Anbeginn des 
„Peeker“ haben sich drei Presse- 
sprecherinnen die Klinke in die 
Hand gedrückt) nur Wirkung und 
nicht Ursache eines viel tiefer lie- 
genden Management-Konflikts, 
der sich aus amerikanischer Sicht 
etwa wie folgt darstellt: 

— In der Anfangszeit der amerikani- 
schen Apple-Firma („Wozniak- 
Jobs-Ära“) war man auf Apple- 
Clubs, Freaks und peeker-ähnliche 
Zeitschriften („Call Apple“, „Nib- 


ble“ usw.) angewiesen, da das 


eigene technische Knowhow aus 
personellen Gründen begrenzt 
war. Der kometenhafte Apple-Auf- 
stieg ist letztlich durch peekende 
Clubs und Freaks bedingt worden. 
— Dann kam eine Übergangsphase 
(„Jobs-Wozniak-Ära“), in der die 
Clubs und Freaks gerade noch ge- 
duldet wurden. 

— Schließlich trat man in die heuti- 
ge amerikanische Phase („Scul- 
ley-Jobs-Ära“), die durch die Pa- 
role „Keine Infos an Clubs, Freaks 
und kritische Zeitschriften“ ge- 
kennzeichnet ist. 

Diese Entwicklung hat aus der 
Sicht der amerikanischen Marke- 
ting-Strategie ihre Berechtigung, 
weil die amerikanische Mutterfirma 
über das technische Knowhow 
verfügt. Aus deutscher Sicht sieht 
die Lage jedoch ganz anders aus: 
— Erstens hinkt die deutsche Ent- 
wicklung der amerikanischen um 
mindestens zwei Jahre hinterher, 
und zwar hinsichtlich des Mikro- 
computermarktes im allgemeinen 
sowie hinsichtlich der Adaptation 
amerikanischer Produkte im be- 
sonderen. Ferner hinkt auch die 
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deutsche Computermentalität der 


amerikanischen hinterher. Diese 
Mentalitätsunterschiede erklären 
auch, warum beispielsweise der 
Mecki in den USA sehr gut und in 
Deutschland sehr schlecht ver- 
kauft wird. Deutsche assoziieren 
EDV immer noch mit Effizienz und 
Schnelligkeit, während Amerikaner 
inzwischen zusätzlich das Spieleri- 
sche und Ästhetische in den Vor- 
dergrund rücken. Angesichts einer 
Arbeitslosigkeit von über 10 % 
wird es zur Zeit nur wenigen Un- 
ternehmern in den Sinn kommen, 
den eigenen Mitarbeitern ein 
Schnickschnack-Gerät in der Art 
des Mecki zur Verfügung zu stel- 
len, denn die Maus, die Grafiken 
und die diversen Schriftsorten 
würden zu Spielereien verlocken, 
für die die Arbeitsmentalität in 
deutschen Landen kaum Raum 
läßt. 

— Zweitens verfügt Apple-Mün- 
chen als reine Marketing-Firma 
über kein Knowhow, wie man es 
bei der amerikanischen Mutterge- 
sellschaft gewohnt ist. Oder ken- 
nen Sie eine Hardware oder Soft- 
ware, die in München entwickelt 
worden ist? Wenn man wie in den 
USA jetzt auch in Deutschland die 


Clubs und Freaks wie eine ausge- 
quetschte Zitrone wegwirft, so ent- 
steht ein technisches Informa- 
tionsvakuum, das die Hilfesuchen- 
den im Regen stehen läßt. So ge- 
sehen kann der Apple-Besitzer 
zwar auf Apple-München, nicht je- 
doch auf peeker-ähnliche Informa- 
tionsquellen verzichten. Dies hat 
man sicherlich in München er- 
kannt. Da jedoch die Direktiven 
aus Cupertino anders lauten, igelt 
man sich ein, damit man ja nichts 
Falsches sagt gemäß der Maxime 
„Si tacuisses philosophus man- 
sisses”. 


Angesichts der Kursänderung der 
AUGE wird man mit Spannung die: 
weitere Entwicklung nach der Wahl 
des neuen Vorsitzenden auf der 
bevorstehenden Jahreshauptver- 
sammlung im März verfolgen dür- 
fen. Bleibt nur zu hoffen, daß man 
die exzessive Vereinsmeierei auf- 
gibt und zu den ursprünglich ge- 
steckten Zielen wieder zurück- 
kehrt, denn Apple-München wird 
den Verein erst dann ernst neh- 
men, wenn man geschlossen und 
notfalls auch hart im Sinne des 
Schürmann-Kursus auftritt. 

Ulrich Stiehl 





Ergänzungen zu 


„ProDOS für Aufsteiger“, Bd. 1 


von Arne Schäpers 


(Herr Schäpers, ein exzellenter 
ProDOS-Kenner, hat mein Pro- 
DOS-Buch kritisch unter die Lupe 
genommen und dabei einiges rich- 
tiggestellt, das mir durch die „Lap- 
pen“ gegangen ist. us) 


Seite 19 — Warum ist BLOAD 
(READ) erheblich schneller als 
BSAVE (WRITE)? 

WRITE arbeitet Byte per Byte (Puf- 
fer kopieren), READ dagegen in 
drei Stufen: 

Stufe 1: Byte per Byte (Pufferko- 
pie), bei gesetztem NEWLINE 
bleibt es auch dabei. Stufe 2: Block 
Read: Der Datenteil des File-Puf- 
fers wird auf die Zieladresse ge- 
setzt, und SET MARK liest unter 
Umgehung des File-Puffers direkt 
in den Zielbereich. Stufe 3: Wenn 
nach Stufe 1 und 2 immer noch 
ganze Blocks übrig sind, wird der 
Indexblock direkt ausgewertet und 
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von READ aus der Disk-Driver mit 
entsprechender Zieladresse auf- 
gerufen. Endet der READ nicht auf 
einer Blockgrenze, werden die 
letzten Bytes wieder Byte per Byte 
aus dem File-Puffer kopiert. Eine 
sehr durchdachte Routine. 


Seite 27 — Liest Bootprogramm 
auch Sektor 1? 

Das Boot-Programm liest Track 0, 
Sektor 0, danach Sektor 2 (physi- 
kalische Sektornummer). Der 
Block 1 wird nur für SOS gelesen. 


Seite 32 — Was bedeuten Seek 
und Format beim Disk-Driver? 
SEEK ist für CMD = 00 nicht im- 
plementiert, Arm-Bewegungen fin- 
den keine statt. Im MLI wird vorher 
noch Block 00 00 gesetzt, um ein 
eventuelles Aussteigen über Feh- 
ler-Nr. 27 (hier: illegale Blocknum- 
mer) zu vermeiden. 


CMD = 03: FORMAT ist nur für die 
RAM-Disk implementiert. (Neue 
Erkenntnis: Wenn das sog. Init- 
Flag auf O gesetzt ist - nach dem 
Booten automatisch der Fall —, wird 
vor dem ersten RAM-Disk-Zugriff 
der Directory- und Volume-Bit- 
Map-Block „initialisiert". Setzt 
man durch eine kleine Poke-Routi- 
ne das Init-Flag auf 255, so bleibt 
nach dem Neubooten der RAM- 
Disk-Inhalt unversehrt. Ein ent- 
sprechender Patch, der allerdings 
versionsabhängig ist, wird im 
nächsten „Peeker“ veröffentlicht. 
us) 

Seite 57 — Was bedeutet Label 
Präfix ($BF9A) ungleich 0? 

Dies ist der Startindex des mo- 
mentan gesetzten Präfixes in der 
Seite $F100. Bereich $CO-$FE. 


Seite 63 — Korrekturen zu den in- 
ternen Puffern (gilt nur für 1.0.1): 
$EF25-$EFFF: Tabellen 
$F000-$FOFF: Variablen 
$F100-$F1EF: Neuer Pathname 
$F1C0-$FIFF: Präfix 

$F200: Volume Control Block 
$F300: File Control Block 
$F400-F5FF: Volume Bit Map 
$F600-$F7FF: Druckfehler: Hier 
steht zum zweiten Mal 
$F4000-$F5FF. Außerdem ist der 
Begriff Catalog-Block mißver- 
ständlich, da das BASIC.SYSTEM 
ein OPEN des Directory mit eige- 
nem File-Puffer und anschließen- 
dem READ durchführt. Folge: In 
$F600-$F7FF befindet sich zu- 
nächst der Hauptzeiger des Direc- 
tory. 


Seite 65 — Warum „Drive too 
fast"? 

Die Fehlermeldung kommt daher, 
daß der Formatter anstelle von 
$DE $AA $EB die Bytes $DE $AA 
$DE $EB als Address Field Trailer 
schreibt. Das zweite $DE wird nir- 
gendwo überprüft, nimmt aber pro 
Track 16 Bytes mehr Platz weg. 
Für künftige Zwecke reserviert? 


Seite 105 -— Warum nur 32M-Volu- 
mes und 16M-Files? 
Max. Volume-Größe gesetzt durch 
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16-Bit-Blocknummer: 256 - 256 -» 
512 Bytes. Max. File-Größe ge- 
setzt durch 24-Bit-Position im File: 
256 - 256 - 256 Bytes. (Daß ich dies 
nicht begründete, war ein „totaler 
Blackout“. us) 


Seite 107 — Präfix mit Schrägstrich 
am Ende? 

Dieser muß nicht definiert werden 
und wird auch nicht gespeichert. 
GET PREFIX hängt diesen Schräg- 
strich explizit an den ausgegebe- 
nen String an. 


Seite 120—- Was macht DELETE im 
einzelnen? 

DELETE (DESTROY) benutzt SET 
EOF, woraus sich die Begründung 
für das Löschen der Indexe ergibt. 
Allerdings wird immer nur der erste 
Block (Typ 3: Masterblock und er- 
ster Indexblock, Typ 2: Indexblock) 
auf der Diskette überschrieben. 
Folge: Von einer Datei des Typs 3 
bleibt der zweite Indexblock auf 
der Diskette voll erhalten. Ob das 
etwas für einen UNDELETE-Befehl 
nützt, ist eine andere Frage. 


Seite 132 - 
STON"? 

Byte $14 enthält als Standard die 
Zahl $75, „HUSTON“ steht auf 
den relativen Bytes $15-$1B, nicht 
auf $14-$1B. Beim Lesen eines 
Subdirectory-Key-Blocks wird die- 
ses Byte ($14) getestet. Die Zahl 
selber ist dabei unwichtig, es müs- 
sen 5 Bits gesetzt sein, ansonsten 
INCOMPATIBLE FILE FORMAT 
($D885). 


Was prüft „HU- 


Seite 150 - Spezielle System-Bit- 
Map-Konflikte 

Wenn ProDOS Daten in den Para- 
meterblock zurückliefert und der 
Parameterblock dabei auf einen 
Puffer zeigt (GET PREFIX/ONLINE 
etc.), wird der Puffer mit der Sy- 
stem-Bit-Map verglichen. Routinen 
mit einem Puffer in der Seite 3 
funktionieren deshalb nicht. Wenn 
der Puffer nicht auf einer Seiten- 
grenze anfängt, überprüft die 
Checkroutine nicht $200, sondern 
$300 Bytes. 





ProDOS-Bücher und -Aufsätze 


Wenn Sie sich gewundert haben, 
daß von der Serie „ProDOS für 
Anfänger“ bislang nur der 1. Teil 
(im Peeker, 2/1984) erschienen 
war, so hat dies einen besonderen 


Grund: Wir möchten Ihnen stets 
aktuelle und detaillierte Informatio- 
nen bieten. Dies ist uns jedoch bei 
ProDOS nur mit Mühe möglich, 
weil Apple allein im letzten Jahr 
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mindestens 3 Versionen — bekannt 
sind uns 1.0.1, 1.0.2, 1.1.1 — her- 
ausgebracht hat, die nicht völlig 
funktionsgleich sind. Bei einer 
oberflächlichen ProDOS-Darstel- 
lung in „Mecki-Manier“ — viele 
Bildchen und wenige Worte -— 
könnte man die Feinheiten ignorie- 
ren. Dies geht jedoch nicht an, 
wenn handfeste professionelle 
Hilfsprogramme veröffentlicht wer- 
den sollen. Einige Beispiele: Bei 
der Version 1.1.1 beginnt das Ma- 
chine Language Interface MLI bei 
$DEOO und der Disk-Driver bei 
$D000, während sich noch bei der 
Version 1.0.1 das MLI bei $DO00 
und der Disk-Driver bei $F800 be- 
fand. Version 1.1.1 hat den neuen 
Befehl „BYE“ (Reboot-Routine), 
der bei 1.0.1 und 1.0.2 fehlt. Der 
Uhr-Driver ist jetzt wieder verlegt 
worden usw. Der Grundsatz 
„Think first, program later“ wird 
augenscheinlich ignoriert. Dies 
verrät — gelinde ausgedrückt — 
Konzeptionslosigkeit, es sei denn, 
daß die Irritation intendiert ist, um 
den Fremdfirmen (Beispiel: Erphi- 
Controller mit ProDOS-Driver-Pat- 
ches) das Leben schwer zu ma- 
chen. 

Alle bisherigen „Peeker“-Pro- 
DOS-Utilities (QAUICKCOPY, PRO- 
DOS.PATCH) beziehen sich auf 
die Version 1.0.1 und laufen nicht 
auf den späteren Versionen. Wir 
werden zukünftig die jeweils gülti- 
ge ProDOS-Version deutlich ver- 
merken und im übrigen unsere Uti- 
lities an neuere Versionen anpas- 
sen, wobei wir allerdings einige 
Zwischenversionen überspringen 
werden, da diese offenbar mehr 
„Übungscharakter“ haben. 


Zu ProDOS gibt es folgende Bü- 
cher: 


a) „ProDOS Technical Reference 
Manual“ (Apple): Sehr gründliche, 
aber zugleich sehr theoretische 
Beschreibung der MLI-Befehle 
(mit nur einem einzigen Anwen- 
dungsbeispiel!). Der Disk-Driver 
und das BASIC.SYSTEM werden 
nicht behandelt. ProDOS-Interna 
fehlen. Zielgruppe: Systempro- 
grammierer. 

b) „Beneath Apple ProDOS“ 
(Quality Software): Stark an (a) an- 
gelehnte Darstellung; zusätzlich 
eine Reihe von Anwendungsbei- 
spielen sowie Patches (inzwischen 
teils überholt). Zielgruppe: As- 
semblerprogrammierer. 

c) „ProDOS für Aufsteiger, Band 
7“ (Hüthig-Verlag): Wenig an (a) 
angelehnte Darstellung der inter- 
nen und externen Speicherorgani- 
sation mit zahlreichen Block- 
Dumps und MLI-Beispielen, die 
auch unter Version 1.1.1 laufen. 
Die ProDOS-Global-Page ist wie 
bei (a) und (b) teils überholt. Ziel- 
gruppe: Assemblerprogrammierer. 
d) „ProDOS für Aufsteiger, Band 
2“ (Hüthig-Verlag): In Vorberei- 
tung befindliche Darstellung der 
BASIC.SYSTEM-Befehle. Ziel- 
gruppe: Applesoft-Programmierer. 
Aus Zeitgründen werde ich zu- 
nächst die Serie „ProDOS für An- 
fänger“ im Peeker veröffentlichen 
und dann eine aktualisierte Zusam- 
menfassung der Serie - bereichert 
um größere ProDOS-Utilities — als 
2. Band von „ProDOS für Aufstei- 
ger“ herausbringen. 

e) „Die ProDOS-Analyse“ (Hü- 
thig-Verlag): In Vorbereitung be- 
findliiche Beschreibung der Pro- 
DOS-Interna in Form eines sehr 
ausführlichen Disassembler-Kom- 
mentars. Zielgruppe: Assembler- 
Programmierer. 

Ulrich Stiehl 





INALL 
INPUT für DOS/ProDOS 


Die nachfolgende Utility simuliert den Input-Befehl (Eingabe von 
Tastatur/Diskette) und läßt alle Zeichen zu (Komma, Doppelpunkt 
usw.). Anstelle von „INPUT X$“ verwendet man jetzt „CALL 768, 
X$“. Der Variablename ist beliebig, doch muß es sich um eine 
Stringvariable handeln. Ein ausführlicher Kommentar folgt in 
einer der nächsten Peeker-Ausgaben. 


10 FOR X = 768 TO 793: READ Y: POKE X, Y: NEXT 
20 DATA 32,6,277,32,190,222,32,227,223,32,108,221,133,133, 
132,134,32,44,213,200,32,233,277,76,154,218: 


REM von H. Grumser/1985 


30 CALL 768, X$: REM Beispiel 
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Apple-Bücher im Preisvergleich 


Die Zahl der Bücher speziell über den Apple Il wird immer 
größer. Neben einer Vielzahl amerikanischer Titel kann der Leser 
inzwischen auf eine große Auswahl deutscher Werke zurückgrei- 
fen. Mit der wachsenden Titelzahl wächst aber auch das Preis- 
bewußtsein der Käufer. Die nachfolgende Aufstellung umfaßt 
deshalb eine nach dem Quotienten Preis/Seitenzahl aufsteigend 
sortierte Titelliste, die zeigt, daß man zwischen DM 0,07 bis DM 
0,90 pro Seite bezahlen muß. Bei deutschen Verlagen unterliegen 
Bücher in der Regel der sog. „Preisbildung der zweiten Hand“, 
d.h. die Endabnehmerpreise sind gebunden (nach GWB 816 
zulässig); „Feilschen“ wäre also zwecklos. Ausländische Titel 
können demgegenüber von Importeuren frei kalkuliert werden. 
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Buchtitel 


Z800® Assembly Language Programming 
Programmierung des Z8® 

6502 Programmieren in Assembler 
Einführung in Pascal 

The 8086 Book 

Computer Lexikon 

6809 Programmieren in Assembler 
Computer Dictionary 

Z800® Aufbau und Anwendung 

8080/8085 Programmieren in Assembler 
Microcomputer Applications in the Classroom 
Apple II Basic Handbuch 

Das Pascal Handbuch 

Apple Graphics: Activities Handbook 
Microcomputer Dictionary 

Grundkurs in Pascal,Band 1 

6809 Assembly Language Programming 
Microprozessor-Interface Technik 
File and Data Base Techniques 
Principles of Programming Languages 
Apple II Tips + Tricks 
Programmierung des 6592 

Vom Umgang mit CP/M 

Einführungskurs: Apple II,II+,IlIe 
Applesoft Training 

CP/M Anwenderhandbuch 

The Apple Program Factory 

Apple Basic 

Introductory Experiments to 8@89A Vol.l 
Z-80 Programming & Interfacing Vol.2 
Apple DOS 3.3 Tips & Tricks 

Apple ProDOS für Aufsteiger 

6502 Anwendungen 

Apple II Anwenderhandbuch 

Apple Pascal 

Spiele für den Apple 

CP/M-Handbuch 

808ßA Interfacing & Programming 

The Creative Apple 

Apple Files 

The Book of Apple Software 
Basic-Computer-Spiele 1 
Basic-Computer-Spiele 2 

Introductory Experiments to 808ßA Vol.2 
Apple Software Wegweiser 

Apple II leichtgemacht 

Basic Computer Programs for Business Vol.2 
8080/85 Software Design 2 

Apple Assembler 

Computer Dictionary & Handbook 

Apple Basic Übungen 

Apple Pascal Games 

Enhancing your Apple II Vol.l 

An Apple in the Classroom 

How to Program & Interface the 68ß® 
Pascal Programme für Wissenschaftler & Ing. 
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Buchtitel 


The Programmers CP/M Handbook 

8080/85 Software Design 1 

Programming the 6899 

Basic für den Kaufmann 

Apple II Basic-Wegweiser 

Apple Hardware Wegweiser 

Basic-8® und CP/M 

Microcomputer Graphics 

Apple II Raster Grafik 

Logo: Grafik,Sprache,Mathematik 
Schul-Software-Katalog 

Programming & Interfacing the 6592 
Basic-Programme:Mathrmatik, Statistik, Inf. 
Advanced 652 Programming 

6801,68701 & 6803 Interfacing 

Wordstar für die Praxis 

Apple II Assembler-Programmierung 

Beat the Odds 

Z-80 Programming & Interfacing Vol.l 
Erfolg mit Visicalc 

Logo im Mathematikunterricht 

An Introduction to engineered Software 
The Apple in your Hand 

Lehrspielzeug Computer:Apple 

8255 Interfacing 

Thinking about TLC Logo 

Einführung in Wordstar 

Programme für meinen Apple II 

8085A Cookbook 

CP/M Bible 

Z-80 Microcomputer Handbook 

Computer ,Teaching & Learning 

The Apple Connection 

C-Programmierung 

TEA an 8080/85 Editor/Assembler 
Advanced Pascal Programming Techniques 
Basic Computer Programs for Business Vol.l 
Wirtschaft auf dem Apple II/IIe 

Planen und Entscheiden mit Basic 

Unix Primer Plus 

Mathematik auf dem Apple 

CP/M User Guide, Third Edition 

Erfolg mit Multiplan 

Basic Computer Programs in Science and Eng. 
Soul of CP/M 

Apple Basic:Data File Programming 

An Apple for Kids 

77 Basic-Programme 

Apple II Technik & Wissen 

The Visicalc Book,Apple Edition 

Apple II Assembly Language 

Z8® Software Gourmet Guide & Cookbook 
Pascal for the Apple 

Programming the Z890d 

6562 Software Design 

All About DOS 

MS-DOS and PC-DOS,User's Guide 

Using the 6808 Microprozessor 

CP/M und Wordstar 

Apple Basic for Business 
Intermediate-Level Apple II Handbook 
Apple Pascal Grafik 

Running MS-DOS 

Programming the Apple II & Ile 

DOS Handbuch 

Apple Interfacing 

Games Apples play 

6809 Programming & Interfacing 

Basic aus der Praxis 

Pascal Programs in Science and Engineering 
8080 Software Gourmet Guide & Cookbook 
Apple Programming for Learning & Teaching 
Programmer's Guide to the 1892 

Planen und Kalkulieren mit Multiplan 
Microsoft Fortran 

Supercalc im Einsatz 

Z-80 Advanced Interfacing 

6800 Software Gourmet Guide & Cookbook 
Guide to your Apple III 

Einführung in Logo 

Fortran Programs for Scientists & Engineers 
Apple II Applications 

Numerical Basic 

Hardware Interfacing with the Apple II plus 
Apple Maschinensprache 
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Buchtitel 


Learning Logo on the Apple II 

Your Apple II needs you 

Planen und Kalkulieren mit Visicalc 
Das Datenbanksystem dBase II 

Mostly Basic Vol.2 

Golden Flutes and Great Escapes 

The Academic Apple 

Cobol for Beginners 

Einführung in Datenbanksysteme mit dBase 
Integer Basic Handbuch 

Apple Fortran 

How to make Money with your Microcomputer 
Pascal Programming for the Apple 
dBase: Eine Einführung 

6592 Software Gourmet Guide & Cookbook 
Apple Basic 

Reference Manual Ile 

Einführung in Forth 

Using 6592 Assembly Language 

How tp build a Program 

How to use the Apple II and Ile 
Science and Engineering Prograns 
8088 Assembler Programming for the IBM PC 
All About Pascal 

Multiplan richtig einsetzen 
Advanced 652 Interfacing 

32 Basic Programs for the Apple 
Apple Pascal 

Forth-Programming 

Handbook of Applesoft Basic II+/e 
Z-80 Microcomputer Design Projects 
The compleat Apple CP/M 

Basic Apple IIe:A programming Guide 
Inside concurrent CPM 86 

Wörterbuch der Computerei 

Kids to Kids 

CP/M Database Management Systems 
All About Applesoft 

dBase II richtig eingesetzt 

Pascal Programs for Business 
Interface Projects for the Apple II 
Basic-Dialekte im Vergleich 
Datenübertragung und Datenaustausch 
CP/M Revealed 

Microprozessor Circuits Vol.2 

Apple II Word Processing 

Computer Graphics Primer 

Multiplan Deutsch 

Practical Basic Prograns 

Picture Perfect 

Mostly Basic Vol.l 

Pascal Primer 

Structural Problem Solving with Pascal 
Graphically Speaking 

The Basic Conversions Handbook 
Apple II Schaltpläne 

Microprozessor Circuits Vol.l 

Apple Graphics Games 

What's Where in the Apple 

Wordstar Befehlsübersicht 

The Apple Almanac 

Mail Merge 

Computer Playground 

Intro to Arithm for Dig Sys Designers 
The Turtle's Source-Book 

Beneath Apple DOS 

Graphics Cookbook for the Apple 
Discover Forth 

The Custom Apple 

Unix Programmers Manual 

Apple II Computer Graphics 

Data Plotting Software for Micros 
Microsoft Cobol 

Animation,Games and Sound for Apple II/IIe 
Wordstar 

Circuit Design Programs for the Apple II 
Graphic Software for Microcomputer 
Apple II ROM Listing 

Visicalc mit Disk 

CP/M Primer 

A bit of Logo Magic 

Apple II-6592 Ass.Lang.Tutor 

Apple II DiskGuide 

Author Kit 

Visicalc DiskGuide 
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Leserbriefe 


Hardware-Beiträge 

Mit dieser Postkarte möchte ich Ih- 
nen positive Resonanz verschaf- 
fen: Die von Ihnen verfaßten Bü- 
cher Apple Assembler und Apple 
DOS sind eine Fundgrube wertvol- 
ler Informationen zu einem unge- 
wohnt moderaten Preis; gleiches 
Lob für die Zeitschrift Peeker, wo- 
bei einige „Hardware-Beiträge“ 
(Interfacekarten und angewandtes 
Interfacing) sehr gut hineinpassen 
würden. Ansonsten: weiter so und 
vielen Dank! Jürgen Treumer, 
München 


If...Then...Else (Peeker 1/84) 

Die sehr effektive „Block-If“- 
Struktur, die z.B. Fortran 77 bietet, 
kann auch in Applesoft-Basic leicht 
implementiert werden. Dazu muß 
im wesentlichen nur der logische 
Vergleichsausdruck invertiert 
werden. 

Fortran 77: 

IFexp 1 THEN 


Else IF exp2 THEN 
ELSE 


END IF 
Basic: 
aaa IF NOT expi THEN GOTO bbb 


GOTO dad 
bbb IFNOT exp2 THEN GOTO ccc 


GOTO dad 
ccc REM „entspricht ELSE“ 


ddd REM „Sammelpunkt“ 

Es dürfen beliebig viele „Else IF"- 
Blöcke (oder auch gar keine) auf- 
treten. Der „ELSE“-Block bildet, 
falls vorhanden, den Abschluß. 
Das „NOT“ im Basic-Text kann in 
den meisten Fällen durch einen 
„umgedrehten“ Vergleichsopera- 
tor ersetzt werden (aber bitte <= 
statt > usw.). Eine Ausnahme bil- 
den komplizierte logische Aus- 
drücke, die durch Umschreiben 
noch unübersichtlicher würden 
(und deshalb sowieso vermieden 
werden sollten). 

Die Punkte entsprechen den Be- 
fehlen der einzelnen Verzweigun- 
gen. Auch hier dürfen natürlich 
wieder Abfragen auftreten (Ver- 
schachtelung). 

Fortran erlaubt zwar einen beliebi- 
gen Aussprung aus dem Block-If, 
einen Einsprung aber nur via „IF 
expi THEN“. Da in Basic die ge- 
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samte Struktur nur programmtech- 
nisch existiert, ist natürlich der Ein- 
sprung an beliebiger Stelle mög- 
lich. Wie sinnvoll dies jedoch ist, 
muß jeder selbst entscheiden. Es 
entsteht auf diese Weise sehr 
leicht ein undurchdringlicher Spa- 
ghetti-Code. 

Albert Markl, Ismaning 


RAM-Disk-Driver 

Zunächst möchte ich Ihnen zu der 
wirklich gelungenen Konzeption 
des „Peeker” gratulieren. Eine 
Zeitschrift, die sich an den Bedürf- 
nissen des fortgeschrittenen Ap- 
ple-Programmierers orientiert und 
nicht nur auf einigen Seiten „Tips 
& Tricks“ bringt, fehlte meines 
Erachtens schon lange auf dem 
Zeitschriftenmarkt. Neben Ihrer 
Serie über „Double Lores“- und 
„Double Hires“-Grafiken war ich 
besonders über den RAM-Disk- 
Driver für die Language-Card (Heft 
1/2 '85) begeistert. Als Anregung 
möchte ich an dieser Stelle folgen- 
des nennen: Damit die in der 
RAM-Disk abgelegten Files schnell 
auf einer Floppy abgelegt werden 
können, wäre eine kurze, von BA- 
SIC aufrufbare Utility wünschens- 
wert, die den Inhalt der RAM-Disk 
auf Diskette kopiert. 

Alle, die wie ich einen Apple Il Plus 
ohne Kleinschrift besitzen, haben 
sich sicherlich über die merkwürdi- 
gen Zeichen in der Frage „Ram- 
disk mit Init J/N ?" des Drivers 
gewundert. Kleinbuchstaben wer- 
den vom „Großschrift-Apple“ be- 
kanntlich als Sonderzeichen inter- 
pretiert. Ein kleiner Patch sorgt 
nach Laden des Drivers für Abhil- 
fe: $6151:AQd CD C9 D4 AD C9 
CE C9 D4 A® BF. Die Meldung 
erscheint nun in Großbuchstaben. 
Georg Bang, Oldenburg 


AUGE 

Ich kann Ihnen für Ihren Peeker 
nur gratulieren. Das ist genau die 
Informationsquelle, die ernsthafte 
Apple-Hobbyprogrammierer ge- 
sucht haben, die man aber vergeb- 
lich in der Apple User Group sucht. 
Was ich besonders gut finde, ist 
die Tatsache, daß Ihre Programme 
auch funktionieren. Das liegt wohl 
daran, daß Sie, der Chefredakteur, 
den Apple in- und auswendig ken- 
nen, aus der Branche kommen, 
und die Sorgen und Nöte der 
Freaks aus eigener Erfahrung ken- 
nen. Bitte machen Sie nur weiter 
so. Rudolf Rötering, Soest 


Assembler-Grundlagen 

Als relativer Neuling im Program- 
mieren des Apple Ile komme ich 
zwar mit dem Programmieren in 
Applesoft ganz gut zuwege; doch 
schaue ich in den „Peeker“, so 
begegnen mir die Programmdar- 
stellungen überwiegend in hexa- 
dezimaler und Assembler- 
Schreibweise. Nun habe ich mir 
gestern den Assembler-Kurs „mi- 
ster micro“ gekauft, der speziell für 
den Apple Il/lle geschrieben wur- 
de (Sybex-Verlag) und dem eine 
Assembler-Diskette beigefügt ist; 
doch wenn ich glaubte, mit diesem 
Rüstzeug endlich den Zugang zu 
den inneren Geheimnissen in der 
Handhabung meiner Konfiguration 
gefunden zu haben, so sehe ich 
mich entäuscht. Vielleicht könnten 
Sie mir da einige Hinweise geben, 
wie ich mit Sicherheit zu dem er- 
sehnten Durchblick komme, damit 
ich den „Peeker“ in Zukunft auch 
mit Gewinn verstehen und nutzen 
kann. Ernst Kaiser, Titisee-Neu- 
stadt 


Jubeltests 

Erstmal herzlichen Glückwunsch 
zu dieser Zeitschrift. Wie ich hoffe, 
bleibt sie so interessant und frei 
von „Jubeltests“, ansonsten finde 
ich ihre jetzige Mischung aus Soft- 
ware- und Hardware-Infos sehr 
gelungen. Bitte weiter so. 

Ich besitze seit 1979 einen Apple |l 
europlus und bin naturgemäß be- 
sonders an Beiträgen zu diesem 
Thema interessiert. Insbesondere 
gute Assemblerprogramme inter- 
essieren mich, oder wie wäre es 
mal mit einem Beitrag zu Star-Ge- 
mini 10X; dort wäre die Character- 
Download-Procedure sehr interes- 
sant. Auch Z80-Assembler wäre 
bestimmt ein ergiebiges Thema, 
somit gibt es bestimmt noch viel zu 
tun. Wilfried Röll, Walldorf 


Glücklicher Mac-Besitzer 

Als ich Ihr Editorial in Heft 2/84 
gelesen hatte, griff ich spontan zur 
Maus, drehte den Bildschirm auf 
und möchte Ihnen hiermit mittei- 
len, daß ich mit meinem neuen Bü- 
romitarbeiter Fat Mac 512K be- 
stens zufrieden bin. Er ist das be- 
ste für den Preis, was ich probiert 
habe. Ich bin auf jeden Fall mit 
meiner Wahl glücklich. Insbeson- 
dere ist für mich der Einsatz des 
Zeichenprogramms eine tolle Al- 
ternative zu den technischen 
Zeichnungen, die ich im Rahmen 


meiner Arbeit zu machen hatte und 
ich nunmehr mit MacPaint erledige 
(MacDraw habe ich noch nicht aus- 
probieren können). 

Ebenso sind meine Damen über 
MacWrite glücklich und ich, da ich 
nunmehr auch einmal einen Text 
selbst tippen und ausdrucken 
kann. Und mit am besten finde ich 
die Übereinstimmung des Bild- 
schirmbildes mit dem Schriftbild 
einer Briefseite. 

Der einzige mir von meinen Da- 
men genannte Nachteil der Tasta- 
tur: Sie spricht ein bißchen zu 
leicht an. Wenn jemand noch zwi- 
schendrein Schreibmaschine 
schreiben muß, so wird ein unter- 
schiedliicher Anschlag der ver- 
schiedenen Tastaturen immer zu 
einer höheren Fehlerquote führen. 
Ich werde Apple vorschlagen, den 
Anschlag der Tastatur veränderlich 
zu gestalten. Und: Nennen Sie mir 
einen formschöneren Computer. 
Rechtsanwalt Klaus Mierswa, 
Mannheim 


Schattenseiten 

Als Leser Ihrer Bücher DOS 3.3 
und ProDOS war ich, nachdem ich 
einen Apple-Fachmann als Chefre- 
dakteur einer Computerzeitschrift 
fand, neugierig geworden. Nach 
der Lektüre der Ausgabe 2/84 se- 
he ich mich „genötigt“, eine weite- 
re Zeitschrift zu beziehen. Zu Ihrer 
Frage im Leitartikel 2/84, ob denn 
bei Testbeschreibungen auch über 
Schattenseiten der jeweiligen 
Testobjekte geschrieben werden 
sollte, meine ich, daß gerade die- 
ses eine unabhängige Zeitschrift 
(Redaktion) auszeichnet. Im übri- 
gen möchte ich Sie ermutigen, so 
weiterzumachen. Halten Sie Ver- 


bindung zu Ihren Lesern. Rolf 
Steinfelder, Hildesheim 
= 
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Mailmerger und Appleworks 


getestet von Ulrich Stiehl 


Die Firma INTUS Lern-Systeme 
AG, 7890 Waldshut-Tiengen, Kai- 
serstraße 21, Tel. 07751/7920, ist 
eigentlich auf Schulsoftware spe- 


Appleworks 


Appleworks ist ein von Rupert 
Lissner (Autor von Quickfile) für 
die Firma Apple entwickeltes drei- 
teilliges Programmpaket für den 
privaten und geschäftlichen Be- 
reich (vorwiegend Kleingewerbe- 
treibende), das unter dem Pro- 
DOS-Betriebssystem läuft. Um es 
gleich vorweg zu sagen: Dieses 
Paket ist unter Berücksichtigung 
der charakterisierten Zielgruppe in 
jedem Fall sein Geld wert! Es setzt 
einen Apple Ilc oder einen Apple 
Ile mit 64K-Karte voraus, läuft also 
nicht auf dem || Plus. Eine einfache 
80-Zeichenkarte ohne 64K-Zu- 
satzspeicher wäre ebenfalls mög- 
lich, doch wäre dann der zur Verfü- 
gung stehende Arbeitsspeicher 
viel zu gering. Appleworks wird mit 
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zialisiert, doch hat sie auch einige 
allgemeine Anwenderprogramme 
veröffentlicht, z.B. den Mailmerger 
als Hilfsprogramm zu Appleworks. 





einem knapp 350seitigen, zweifar- 
big gedruckten Handbuch in Spi- 
ralbindung sowie mit 2 Systemdis- 
ketten geliefert. Die sogenannte 
Start-Diskette dient zum Booten 
des ProDOS-Betriebssystems, 
wobei auch ein „Warmstart“ mit 
„-PRODOS“ o.ä. möglich ist. 
Denn man hat Appleworks nicht 
kopiergeschützt, damit es unein- 
geschränkt mit Festplatten (Profile 
usw.) sowie ggf. auch mit RAM- 
Disks benutzt werden kann. Die 
64K-Karte selbst wird allerdings 
als Datenspeicher und nicht als 
RAM-Disk eingesetzt. Wenn man 
weder die Profile noch größere 
RAM-Karten besitzt, so empfehlen 
sich unbedingt 2 Laufwerke, da 
sonst Programm- und Datendis- 


kette permanent gewechselt wer- 
den müßten. Nach dem „Hochfah- 
ren“ des Betriebssystems (Pro- 
DOS Version 1.1.1) von der Start- 
Diskette muß man die sog. Pro- 
gramm-Diskette einlegen, die 
praktisch voll ist, weil das modular 
aufgebaute, eigentiiche Ap- 
pleworks-Programm über 200 
Blocks einnimmt, die zu einem ein- 
zigen „Monster“ -File zusammen- 
gefaßt wurden. Die diversen Mo- 
dule enthalten nicht nur die As- 
semblerteilprogramme, sondern 
auch die jeweils benötigten Menü- 
Texte. 

Appleworks besticht durch den 
Benutzerkomfort und die Ge- 
schwindigkeit, mit der die einzel- 
nen Funktionen (Sortieren, Su- 
chen usw.) ausgeführt werden. 
Diese hohe Geschwindigkeit 
kommt jedoch nicht von ungefähr: 
Appleworks ist ein RAM-orientier- 
tes Programmpaket, d.h. alles fin- 
det im Arbeitsspeicher („auf dem 
Schreibtisch“) statt. Eine einzelne 
Datei oder die Summe aller Datei- 
en darf im Falle einer 64K-Karte ca. 
55K nicht überschreiten. Ap- 
pleworks ist deshalb nur dann opti- 
mal, wenn entweder kleinere Da- 
tenmassen verwaltet oder größere 
Datenmassen sinnvoll aufgeteilt 
werden können. 

Erwähnenswert ist die Flexibilität, 
mit der Fremddaten (ASCII-Files) 
in Appleworks überführt werden 
können. Nur so war es mir übri- 
gens möglich, mit „schnell ge- 
strickten“ Programmen große Da- 
teien zum Austesten von Ap- 
pleworks zu erzeugen. 


Modul 1: Dateiverwaltung: Die- 
ses Modul, das eine Quickfile-Mo- 
difikation darstellt, dient zum Anle- 
gen, Sortieren und Ausdrucken 
von Dateien aller Art, wobei auch 
„rechnende Felder“ zulässig sind. 
Eine Datei könnte theoretisch 1350 
Datensätze enthalten. Ein Daten- 
satz ist die Summe der Felder (bei 
Adreßverwaltung: Vorname, Zuna- 
me, Straße usw.). Ein Datensatz 
könnte theoretisch 1024 Zeichen 
oder bis zu 30 Felder mit jeweils 
bis zu 76 Zeichen umfassen. We- 
gen der 55K-Kapazität können je- 
doch bei einer Adreßverwaltungs- 
datei, deren Datensätze (mit Brief- 
anrede usw.) erfahrungsgemäß ca. 
180 Zeichen groß sein müssen, 
nur ca. 300 Adressen verwaltet 
werden. (Zum Vergleich kann bei 
meinem „DB-Meister" auf 650 
180-Zeichen-Datensätze zugegrif- 
fen werden.) Die Appleworks- „Da- 
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tenbank“ ist damit mehr im Privat- 
und weniger im Geschäftsbereich 
einsetzbar. 


Modul 2: Textverarbeitung: Die- 
ses Modul hat mir am besten gefal- 
len. Mit einem 55K-Arbeitsspei- 
cher — dies wären ca. 11 Peeker- 
Druckseiten oder ca. 25 Schreib- 
maschinenseiten — kann man sehr 
große Textmassen bearbeiten. 
Überraschenderweise ist die Spei- 
cherverwaltung besser als beim 
47K-Applewriter gelöst, so daß 
man selbst bei vollem Speicher 
noch relativ schnell schreiben 
kann, was beim Applewriter Ile 
nicht mehr möglich ist. Funktionen 
wie Suchen und Ersetzen ähneln 
dem Applewriter. Analog zum 
Wordstar kann man einen rechten 
Rand einstellen, doch werden Sil- 
bentrennungen nicht angeboten. 
Wenn man darauf keinen Wert legt, 
kann man jetzt — im Gegensatz 
zum Applewriter — ein Dokument 
immer so sehen, wie es später ge- 
druckt wird. (Der neue und in 
Deutschland noch nicht erhältliche 
ProDOS-Applewriter wird ähnliche 
Features aufweisen.) 


Modul 3: Tabellenkalulation: 
Dieses Modul entspricht funktio- 
nell dem altbewährten Visicalc. 
Rein theoretisch könnten über 
100.000 Zahlen- bzw. Rechenfel- 
der, unterteilt in bis zu 127 Spalten 
und bis zu 999 Zeilen, eingerichtet 
werden. Wegen der 55K-Spei- 
cherbegrenzung liegt jedoch die 
praktische Obergrenze bei 5000- 
6000 Feldern. Visicalc-DIF-Datei- 
en können von Appleworks über- 
nommen werden. 


Mailmerger 
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Obgleich Appleworks als integrier- 
tes Softwarepaket angepriesen 
wird, hapert es in praxi etwas mit 
der Integration. Beispielsweise 
können Adressen (aus Modul 1) 
nicht mit einem Schemabrief (aus 
Modul 2) verknüpft werden. Hier 
hilft der Mailmerger, der ursprüng- 
lich von der englischen Firma Am- 
ber Software entwickelt und von 
Peter Meyer aus dem Hause IN- 
TUS für deutsche Verhältnisse 
überarbeitet wurde. Der Mailmer- 
ger wird mit einer knapp 40seiti- 
gen, im Kleinoffset hergestellten 
Anleitung und 2 Programmdisket- 
ten geliefert. Um zu veranschauli- 
chen, wie Mailmerger funktioniert, 
ein vereinfachtes Beispiel: 


a) Mit dem Modul 1 von Ap- 
pleworks (Dateiverwaltung) erstellt 
man wie bisher die Adreßdatei. 
Diese Datei muß jedoch für den 
Mailmerger in eine ASCII-Datei 
umgewandelt und auf einer Daten- 
diskette gespeichert werden. Bei 
vollen Appleworks-Adreßdateien 
(55K) muß man praktisch immer 
eine zusätzliche ProDOS-Daten- 
diskette bereithalten. 

b) Mit dem Modul 2 von Ap- 
pleworks (Textverarbeitung) er- 
stellt man den Schemabrief, der 
auch „rechnende Felder“ enthal- 
ten darf, in einer vorgeschriebenen 
Form, z.B.: 


} VORNAME 
! ZUNAME 
} STRASSE 
"PLZ 
TORT 

} ANREDE 


KUBILKOR LER LEN 


t VORNAME } ZUNAME 
! STRASSE 
!PLZ FORT 


} ANREDE, 


(ab hier Briefkörper) 


Zunächst müssen also die zu ver- 
wendenden Felder mit dem „1 "- 
Zeichen definiert werden (Defini- 
tionskopf, der später selbst nicht 
ausgedruckt wird). Danach folgt 
der eigentliche Schemabrief mit 
den Felder-Platzhaltern. Der ganze 
Text muß auch hier aus Ap- 
pleworks heraus in eine ASCII-Da- 
tei umgewandelt und auf einer Da- 
tendiskette gespeichert werden. 

Nach dem Booten der Mailmerger- 
Diskette von Drive 1 — die ASCII- 
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Datendiskette legt man zweckmä- 
Bigerweise in Drive 2 — braucht 
man dann nur noch Adreß- und 
Briefdateiname einzugeben, und 
schon kann der automatische Aus- 
druck beginnen. Die Bildschirm- 
Menüs erklären sich von selbst, so 
daß nach kurzer Benutzung die 
Anleitung nicht mehr benötigt wird. 
Der Mailmerger ist damit eine nütz- 
liche Ergänzung zu Appleworks für 
den Fall, daß Schemabriefe (Wer- 
bebriefe, Rechnungen, Mahnun- 
gen usw.) mit Adressen gemischt 
(„gemergt“) werden sollen. 


Einige Dinge gefallen mir jedoch 
nicht: Der Mailmerger ist partiell 
kopiergeschützt, wobei sich die 
geschützten Dateien 
„MM1.5G.T1.TXT" usw. („1.5G“ 
steht für Version 1.5 German) bis- 
weilen selbst nicht lesen können, 
worauf das Hauptprogramm-Modul 
erneut geladen wird. Außerdem ist 
im Gegensatz zu den ProDOS- 
Richtlinien slotabhängig program- 
miert worden (Slot 6, Drive 1), wo- 
mit der Einsatz einer Profile oder 
RAM-Disk entfällt. Ob die Profile 
als Datendisk verwendet werden 
kann, konnte ich mangels Hard- 
ware nicht feststellen. Die Verwen- 
dung der 64K-RAM-Disk (/RAM, 
S3, D2) in dem Mailmerger-Modul 
„MM.A“, Programmzeilen 20130 
und 20240 ff. ist jedoch auf alle 
Fälle nicht möglich, da mit der dort 
enthaltenen fehlerhaften Directory- 
Read-Methode ein (verkürztes) 
RAM-Disk-Directory nicht ohne 
End-of-Data-Fehlermeldung gele- 
sen werden kann. 


Weiterhin finde ich es schwach, 
daß der Mailmerger ein Applesoft- 
Programm ist. Zwar sind einige 
Ampersand-Routinen an das Ba- 
sic-Programm angehängt worden, 
doch ist der Mailmerger insgesamt 
zu langsam. Mit Hilfe der Balfer- 
Interface-Karte, die an anderer 
Stelle in diesem Peeker beschrie- 
ben ist, habe ich einen Druckerslot 
vorgetäuscht und konnte damit er- 
mitteln, daß die interne Aufberei- 
tung selbst bei nicht-rechnenden 
Briefen ca. 10s pro Brief dauert. 


Damit können insbesondere schnel- 
le Matrixdrucker vom Mailmerger 
nicht optimal bedient werden; dies 
gilt namentlich für kürzere Schema- 
briefe. 


Schließlich mißfällt mir, daß der 
Mailmerger, obgleich er speziell für 
Appleworks gedacht ist, nicht di- 
rekt auf die ureigenen Appleworks- 
Dateien zugreifen kann. Durch die 
vorherige Umwandlung in ASCII- 


Dateien wird der Mailmerge-Vor- 
gang unnötig umständlich und zeit- 


beiten wollen. Der RAM-Disk-Bug 
soll It. Rücksprache in Kürze be- 


raubend. 

Zur Zeit ist der Mailmerger die ein- 
zige Alternative für Appleworks- 
Besitzer, die Schemabriefe verar- 


seitigt werden. 


Ulrich Stiehl 


Nutzen Sie Ihren Apple-Computer 
auch zum Lernen 


INTUS-Lernprogramme sind attraktiv und motivierend für vergnügliches 
und leichtes Lernen mit hohem Lernerfolg. 
Alle Programme in deutscher Sprache für Apple Ile und Ilc. 


@ Maschinenschreiben wie der Blitz. Didaktisch 
ausgezeichnet. Garantiert erfolgreich in 20 Lektionen. 


@ Basic-Lernprogramm. Bestes Lernprogramm 1982 
in USA. 


® Computer-Simulator. Mit Lehrgang in 5 Lektionen. 


DM 188,—— 


DM 295,—— 
DM 146,—— 
® Lesen wie der Blitz. Sehr wirkungsvolles Lesetrainiing. DM 98,-- 


® Zeichensetzung. Aus der Serie „Deutsche Grammatik 
mit Spaß“. Für Sekretärinnen, Schüler und Jedermann“. 


@ Wortschatztrainer, Franz./Deutsch, 800 Wörter 
Englisch/Deutsch, 800 Wörter 
Business English, 1200 Wörter 


@® Rechentrainer, Grundstufe (bis 100/2. Schuljahr) 
Mittelstufe (einschl. Bruchrechnen) 


DM 165,-—- 


DM 140,-—— 
DM 140,-—— 
DM 163,-—— 


DM 98,-- 
DM 98,-—- 


@ Wissenstrainer. Lernstoff selber eingeben, speichern und 
abfragen. Für Vokabeln, Formeln, Fahrschule usw. 


@® Demo-Diskette mit Teilen aus diesen Programmen. 


DM 69,-- 
DM 10,-- 


@ Schulprogramme wie Rechnen/Mathem., Sprachen, Naturwiss., 
Informatik, Vorschule. Bestens für die Nachhilfe geeignet. 


*%*%% Mit Ihrer ersten Bestellung erhalten Sie kostenlos eine Diskette 
mit sieben Denk- und Strategiespielen. 


AN 
INTUS LERN-SYSTEME AG 


Kaiserstraße 21 - 7890 Waldshut-Tiengen - Telefon 07751-7920 
Schweiz: CH-6981 Astano - Telefon 091-732551 und 042-2231 13 
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Eine detaillierte B . 
AppleQuick 


Apple Il-Schaltung 
Das handliche Nachschlagewerk 


wenn Sie Ihren Ap 
rieren, Interfacek 

für häufig gebrauchte Adressen 
und Befehle! 




















Schaltpläne 
Wınston D. Gayler 





Schaltungser weite 
oder einfach nur b 
Innenleben Ihres A 
wissen wollen - di 


64 Seiten über Applesoft, DOS, 
Ihnen eine Fülle an Monitor, Pascal, CP/M. 
Schaltpläne und Ze] Gleich anfordern! 
Theorie und praktische Tıps. 

ISBN 3-89058-012-2 

215 Seiten, DIN A4, DM 64,-- 
In allen Buchhandlungen und Computershops od 
direkt von: Pandabooks , Bismarckstr. 67, 
1000 Berlin 12, (030) 342 88 00 
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Erphi-Controller 


Eine kompatible Erweiterung 


getestet von H. Grumser 


Die Firma erphi electronic GmbH 
vertreibt über den Fachhandel (al- 
so nicht direkt, weshalb man sich 
an Zwischenhändler wie Ueding 
usw. wenden muß) den Controller 
AFDC2, der den Anschluß von 
zwei Diskettenlaufwerken erlaubt, 
wobei außer zwei üblichen „Apple- 
Schnittstellen“ (20polig) auch eine 
Standard-Schnittstelle (Shugart- 
Schnittstelle, 34polig) vorliegt. So- 
mit können sowohl Apple-Laufwer- 
ke und Kompatible als auch Stan- 
dard-Laufwerke betrieben werden. 
Beim Auspacken des Controllers 
erlebt man die erste angenehme 
Überraschung. Die Karte zeichnet 
sich nicht, wie viele andere, durch 
kreuz und quer verteilte Bauteile 
mit nachträglich eingesetzten Kon- 
densatoren aus, sondern durch 
höchste Professionalität. Der mit- 
gelieferte Schaltplan zeigt die Ein- 
sicht, daß Qualität und Transpa- 
renz in engem Zusammenhang 
stehen. 

Die Hardwareanpassung an ver- 
schiedene Laufwerke erfogt durch 
zwei auf der Karte befindlichen 
Schaltergruppen, mit denen 
Schnittstellentyp und Aufzeich- 
nungsformat (Spurdichte, einsei- 
tig/doppelseitig, 35(70)/40(80) 
Spuren) vorgegeben werden. Da- 
durch ist es möglich, Floppy-Disk- 
Drives mit einer Kapazität bis zu 
640K zu betreiben. 

Die volle Leistungsfähigkeit des 
Controllers kann nur ausgeschöpft 
werden, wenn die verfügbaren Be- 
triebssysteme entsprechend ge- 
patcht und um einige Teile erwei- 
tert werden. Dies geschieht durch 
einen sogenannten Autopatch, der 
beim Booten des Rechners das 
Betriebssystem an den erforderli- 
chen Stellen ändert. Der Vorteil 
dieses Verfahrens liegt darin, daß 
die Disketten weiterhin auf „nor- 
malen“ Systemen bootfähig blei- 
ben; das Image des Betriebssy- 
stems wird auf der Diskette nicht 
geändert. 

Das Patch-Programm selbst, der- 
zeit Version 5.0, ist Bestandteil der 
Controller-Firmware, die wegen ih- 
res Umfangs nur noch in Slot 6 
lauffähig ist. Dieses Programm ist 
in der Lage, DOS 3.3, Pascal 1.1 
sowie CP/M 2.2 (56K CP/M von 
Digital Research) zu erkennen und 
zu modifizieren. Zum Test lag be- 
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reits Version 6/3 bzw. 6/5 für Di- 
versi-DOS (2-C und 4-C), Pascal 
1.2 (64K und 128K), CP/M 2.20 
(B) (56K-Version von Microsoft) 
sowie ProDOS (1.0.1, 1.1 — ge- 
meint 1.0.2? — und 1.1.1) vor. Man 
beachte, daß der Patch nur beim 
Booten erfolgt. Würde man z.B. 
ProDOS erneut mit BRUN PRO- 
DOS, A$2000, TSYS einlesen, so 
käme die Controller-Firmware 
nicht zum Einsatz und ProDOS 
würde (mit einem 80-Spur-Lauf- 
werk) nicht mehr laufen. 

Die speziellen Besonderheiten der 
einzelnen Betriebssysteme, insbe- 
sonders bezüglich der Verwaltung 
größerer Datenmengen, sind in 
dem mitgelieferten Handbuch, das 
auf über 50 Seiten sehr detailliert 
alle Hard- und Softwareprobleme 
erläutert, ausführlich beschrieben. 
Da nicht alle Initialisierungs- und 
Kopierprogramme, die im allge- 
meinen beim Erwerb eines Be- 





triebssystems mitgeliefert werden, 
höhere Kapazitäten verwalten kön- 
nen, liefert die Firma erphi eine 
Multi-Disk, die entweder eigene 
Routinen enthält oder bereits vor- 
handene Systemroutinen entspre- 
chend modifiziert. 

Bei der Anpassung der Betriebssy- 
steme an neue Hardware-Gege- 
benheiten hat man sich bei erphi 
die Kompatibilität zum alten Sy- 
stem zur höchsten Maxime ge- 
wählt. So wurde z.B. beim DOS 
3.3 die größere Datenmenge nicht 
durch eine trickreiche Erweiterung 
der Catalogspur und der VTOC er- 
reicht, sondern durch die Einrich- 
tung eines zweiten Catalogs, der 
virtuell über Drive 3 und 4 ange- 
sprochen wird (DOS 3.3 kann ma- 
ximal 400K pro Volume verwalten). 
Soll der Apple ausschließlich mit 
Laufwerken höherer Kapazität be- 
trieben werden, so stellt sich das 
Problem, käuflich erworbene Soft- 


Erphi-Controller mit Doppellaufwerk 
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ware, die fast immer auf 35-Spur- 
Disketten vertrieben wird, auf eine 
Diskette höherer Kapazität zu ko- 
pieren. Hierzu befindet sich auf der 
Multi-Disk eine Utility, die ein be- 
stimmtes Laufwerk des erweiterten 
Floppy-Disk-Systems per Soft- 
ware zu einem 35-Spur-Drive er- 
klärt. 

Beim Test wurde ein 640K-Dop- 
pellaufwerk der Firma erphi be- 
nutzt, wobei unter allen Betriebs- 
systemen die erhöhte Kapazität 
ohne Schwierigkeiten ansprechbar 
war. Der Vorteil zeigte sich beson- 
ders unter Pascal, da sich hier nun 
die Möglichkeit bietet, alle 4 Sy- 
stem-Disketten auf einer einzigen 
unterzubringen. 

Das Handbuch in Ringbuchform, 
das im übrigen auch einen Teil für 
Assemblerprogrammierer enthält, 
rundet den durchweg positiven 
Eindruck ab. Der Preis von ca. DM 
350,— steht gänzlich in Relation zur 
Qualität dieses Produkts. 


Ausgabe und 
Eingabe mit 


TYPETERM® 
APPLE IVlle 


Das bedeutet: Computer- 


Textverarbeitung von der 
Schreibmaschinentastatur! 


CE-50mit DM 1348,- 


TYPETERM incl. MWSt. 


an 


@ 
QUALITÄT AUS ERSTER HAND. 


_ Ein starkes Interface für starke 
Maschinen! Alle Cursor- und CTL- 
Befehle. 2k ROM auf der Karte für 
DOS, ZDOS, CP/M, Pascal. Slot 
wählbar. Alle Features: Hoch-/Tief- 
stellen, autom. Unterstreichen, var. 
Zeichen- u. Zeilenabstände, autom. 
Papiereinzug, Auto CR/LF usw. usw. 
Ausführl. Handbuch. 


TYPETERM gibt's für alle CE- u. 
EM-Maschinen ab CE-50! Bitte 
Apple II bzw. Ile angeben. 


Das gesamte Programm günstig! 
Versand NN + Porto + 6,- oder 
Vorkasse netto portofrei (Inland), 
Kto. 147 70-306 PGiroA Han. 
Handbuch TYPETERM vorab 10,— 
(Anrechnung). TYPETERM® - ein 
Produkt von 


interkom Kock 2 Mrches m 


electronic Telefon 05139-87393 
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INTERTEXT 


Internationale Textautomation mit dem Apple Ile 


INTERTEXT ist ein von der Firma 
Sauer entwickeltes und auf dem 
Applewriter-TKS-System (TKS = 
Textkommandosprache; WPL = 
Word Processing Language) ba- 
sierendes Programm für automati- 
sierte Textverarbeitung mit dem 
Apple Ile. Das System wurde mir 
vor kurzem in der Peeker-Redak- 
tion vorgeführt. 

Je 4.000 Textbausteine in den 
Sprachen Deutsch, Englisch, Fran- 
zösisch und Spanisch umfassen 
den gesamten Bereich der Ge- 
schäftskorrespondenz und ermög- 
lichen die Rationalisierung und Au- 
tomatisierung des deutschen und 
internationalen Schriftverkehrs. 

Die Verarbeitung der Bausteine er- 


folgt am Bildschirm durch Eingabe 
entsprechender Satz-Nummern 
(Codes). Die Einarbeitungszeit ist 
relativ kurz. Da die Bausteine in 
allen vier Sprachen identisch co- 
diert sind, ist es möglich, Aus- 
landskorrespondenz ohne perfekte 
Fremdsprachenkenntnisse zu 
schreiben. An jeder Stelle der 
Briefe können Variablen oder eige- 
ne Sätze per Tastatur eingefügt 
werden. Eine Verknüpfung mit 
Adreßdateien ist möglich, falls die- 
se mit dem Applewriter erstellt 
wurden. INTERTEXT kann jeder- 
zeit durch eigene Bausteine erwei- 
tert werden. Dies wird auch unum- 
gänglich sein, da die Textbausteine 
nicht branchen-, geschweige denn 


firmenspezifisch sind. Hinzu 
kommt, daß zumindest das Eng- 
lisch, das mir in Form einiger Mu- 
stersätze vorlag, nicht immer idio- 
matisch korrekt ist, z.B. „Our cus- 
tomers place very much importan- 
ce on first-class quality only.“ 


4.000 Textbausteine in 1 Sprache 
kosten DM 1.990,-, 2 Sprachen 
(z.B, Deutsch/Englisch) DM 
3.600,-, und alle 4 Sprachen mit 
insgesamt ca. 16.000 Bausteinen 
DM 5.900,-. Zum Vergleich kostet 
ein zwei- oder mehrsprachiges 
Satzwörterbuch für Auslandskorre- 
spondenz mit 5.000 bis 10.000 
Mustersätzen DM 50,- bis DM 
100,-. So kostet etwa mein 560sei- 


tiges „Satzwörterbuch des Buch- 
und Verlagswesens“ mit 10.000 
Beispielsätzen nur DM 83,-. Dies 
zeigt wieder einmal, daß eine 
„Buch-Datenbank“ erheblich 
preiswerter als eine „Computer- 
Datenbank“ ist. Das TKS-System 
allein kostet übrigens DM 790,-, ist 
also teurer als der Applewriter Ile 
selbst (ca. DM 500,-). Das Textver- 
arbeitungssystem setzt einen Ap- 
ple Ile mit 64K-Karte und 2 Drives 
voraus. Für Firmen mit viel scha- 
blonenmäßiger Korrespondenz ist 
INTERTEXT empfehlenswert, wo- 
bei man allerdings tief in die Ta- 
sche greifen muß. 

Ulrich Stiehl 
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Die TempoHexe ("SpeeDemon”) macht den Apple 
II, II+ und Ile so schnell wie die populären 16bit 
Rechner. Die TempoHexe beschleunigt alle Pro- 
gramme bis zu 31/2 mal - absolut ohne jede Soft- 
ware-Änderung! Einfach einstecken, einschalten 
Ft 
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Histogramme 
Polarkoordinaten 
Signalanalyse 
Fourier-Reihen 
Netzwerke 
Anpassung 
Aktive Filter 
Statistik 


Mehr Informationen B 
und Händleranfragen bei: 





R. Alverdes 
Schwarzwaldstr. 8a 
7602 Oberkirch 
Tel.: (07802) 3707 
Telex: 752637 sfe d 
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Grafische Darstellung von Kurven: Hi- 
stogramme, kart. Koord., halb- u. 
doppeltlog. Darstellung, Polarkoor- 
dinaten, Zeilendrucker-Ausgabe 


Signalanalyse: Mittel- u. Effektivwert, 
Fourier-Reihen u. -Transformation 


Statistik- und Datenanalyse: Methode 
der kl. Quadrate, Punktstatistik 
Passive Netzwerke: Laplace-Trans- 
formation, Netzwerkanalyse, Wur- 
zeln eines Polynoms 


Aktive Filter: Tief-, Hoch-, Bandpaß, 
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in Briefmarken. 


Wir haben die neuste 
Software und Peri- 
pherie für den Apple 
REIT EIT Te EN EToR 


HinfloshstuqmoD nnsmitoH 
Telefon 0431/732222 oder 040/3937 13 





SCREEN80.SAVER 130 DATA 85,192,32,58,3,172,81,3,141,84 
Bandsperre 140 DATA 192,32,58,3,172,81,3,200,192,49 
Halbleiterschaltungen: Trans.-Stufen Speichert den 89-Z/Z-Bildschirm von IIc/IIe 150 DATA 298,221,169,141,32,68,3,238,89,3 


i als Textfile auf Diskette. Funktioniert 160 DATA 173,80,3,201,24,144,204,96,177,4® 
Rechnen mit komplexen Zahlen unter DOS 3.3 und ProD0S. Nach dem Poken 170 DATA 9,128,201,160,176,2,105,64,141,84 
192 S., 165 x 235 mm, 120 Abb. + der Maschinenroutine SAVER aufrufen, wie 180 DATA 192,32,75,3,96,41,255,198,54,9,® 
Tab.. über 50 Prog., 39,80 DM in Zeile 23® angegeben. Dateiname beliebig. 198 RESTORE : FOR X = 768 TO 848: READ Y: 

i Zum späteren Einlesen des Textfiles die POKE X,Y: NEXT 
INALL-Routine verwenden (s. S. 70). 200 REM Demo-Anwendung 

beam-Verlag 21® PRINT CHR$ (4) "PR#3": LIST 

Bahnhofstraße 30 - 3550 Marburg 100 REM SCREEN8ß.SAVER von U.Stiehl/85 230 PRINT CHR$ (4) "OPEN SCHIRM": 


11® DATA 169,90,173,80,3,160,9,149,81,3 
12 DATA 173,80,3,32,193,251,172,81,3,141 


PRINT CHR$ (4) "WRITE SCHIRM": 
CALL 768: PRINT CHR$ (4)"CLOSE" 
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Akustikkoppler AK 300 


Der AK 300 der Firma Software 
Express ist ein postalisch zugelas- 
sener Akustikkoppler (mit FTZ- 
Nummer), der mit einer normalen 
V24-Schnittstelle ausgestattet ist 
und sich deshalb an den Apple Ilc 
(V24 bereits eingebaut) oder den 
Apple Ile mit der Super-Serial- 
Card anschließen läßt. Die Daten- 


übertragung erfolgt wie üblich mit 
300 Baud, also ca. 30 Zeichen/ 
Sekunde. Neben Netzanschluß 
besteht auch die Möglichkeit des 
Batteriebetriebs mit den normalen 
1,5-Volt-Batterien, so daß sich der 
AK 300 besonders für den Ilc emp- 
fiehlt. Einige Apple-Händler haben 
den AK 300 im Lieferprogramm. 


Akustikkoppler dataphon s-21-d 


Die Kommunikation mit Datenban- 
ken, Mailboxen, Großrechnern und 
anderen Mikrocomputern über das 
Telefonnetz ermöglicht der seit 
kurzem auf dem Markt erhältliche 
Akustikkoppler dataphon s-21-d, 
ein Gerät deutscher Herstellung 
(Firma HIB). Der dataphon ist FTZ- 
zugelassen und kann Daten mit 
der üblichen Geschwindigkeit von 
300 Baud übertragen. Die Verbin- 
dung zum Apple erfolgt über eine 
V24-Standardschnittstelle wie bei 
dem AK 300. 

Akustisch dicht schließende Gum- 
mi-Manschetten zur Aufnahme 
von Sprech- und Hörmuschel des 
Telefons gewährleisten eine ein- 
wandfreie Verbindung. 


Parallelportkarte fü 


Diese Karte der Firma Brecht ent- 
hält drei VIA Bausteine R6522. Es 
ergeben sich dadurch 60 TTL- 
kompatible Ein-/Ausgabeleitun- 
gen, davon sind 12 interruptfähig. 
Sechs 16-Bit-Timer für Impulser- 
zeugung, Zählen von Impulsen 
und Erzeugen von Verzögerungs- 
zeiten sowie drei Schieberegister 
lassen sich für die seriell-parallele 
bzw. parallel-serielle Wandlung 
verwenden. 

Durch die Vielseitigkeit der VIAs 
ergeben sich universelle Möglich- 
keiten. Durch Kombination mit Fil- 
ter- und Leistungskarten des glei- 
chen Herstellers kann der Apple Il, 
II+, Ile oder Kompatible in der 
Steuerungstechnik oder z.B. der 
automatischen Qualitätskontrolle 
eingesetzt werden. 


Peeker 4/85 


Trotz des niedrigen Preises bietet 
der Akustikkoppler einige Beson- 
derheiten, die sonst teureren Ge- 
räten vorbehalten sind, z.B. außer 
Answer- und Originate-Modus die 
Möglichkeit der automatischen Ka- 
nalwahl, die den Aufbau einer Ver- 
bindung auch dann ermöglicht, 
wenn nicht bekannt ist, in welchem 
Übertragungsmodus die Gegen- 
station arbeitet. Die Stromversor- 
gung (9-15V) erfolgt wahlweise 
über ein geregeltes Netzteil, Akku, 
Batterie oder über den Schnittstel- 
lenstecker vom Computer aus. Für 
den Apple Il+, Ile (und IIc?) hat 
HIB entsprechene Software er- 
stellt. 


r Apple Il 


Die Karte kann in jedem Slot instal- 
liert werden, wobei die vergoldeten 
Kontakte eine optimale Sicherheit 
in der Kontaktgabe gewährleisten. 
Zum Anschluß der E/A-Leitungen 
stehen 60 Molexfingerkontakte zur 
Verfügung. 

Jeder Lieferung liegt eine Be- 
schreibung der Arbeitsweise der 
Karte bei, aus der die Konfigurie- 
rung und Anwendung der Register 
zu entnehmen ist. Außerdem er- 
hält der Käufer die (englischen) 
Datenblätter des VIA 6522. Der 
Preis der Karte beträgt knapp DM 
200,-. 

Vom gleichen Hersteller ist eine 
zweifach RS-232C-Schnittstelle 
mit EPROM/RAM ($CX00-$CXFF) 
und eine 16-Bit-A/D-Wandlerkarte 
für den Apple erhältlich. 
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Akustikkoppler AK 300 








Akustikkoppler dataphon S-21-d 





Parallelportkarte 
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„Apple Assembler“ wendet sich an alle, 
die bereits Anfängerkenntnisse der 
6502-Programmierung haben und 
nunmehr ein Nachschlagewerk für 
ihren Apple Il Plus /lle/llc suchen, in 
dem alle wichtigen ROM-Routinen 
sowie eine Vielzahl sonstiger Hilfspro- 
gramme in einer systematischen Form 
zusammengestellt werden. Insgesamt 
umfaßt dieses Buch über 40 Utilities, 
darunter mehrere völlig neuartige Pro- 
gramme wie Double-Lores, Double- 
Hires, Screen-Format u.a. 


Der erste Teil enthält ein Repetitorium 
der wichtigsten Befehle, Adressie- 
rungsarten und sonstigen Besonderhei- 
ten des 6502 sowie Angaben zu den 
apple-spezifischen Zahlenformaten 
(Integer- und Fließkommazahlen). 

Im zweiten Teil werden neben einer 
Kurzwiederholung der Monitor-Befehle 
alle Routinen und Adressen des Moni- 
tors zusammengestellt, die für Assem- 
blerprogrammierer von Nutzen sein 
können. Darüber hinaus findet der 
Leser Unterroutinen für Vorwärts- und 
Rückwärts-Moven, hexadezimale Addi- 
tion /Subtraktion /Multiplikation /Divi- 
sion, Binär-, Hex-und ASCII- 






PS 
und Tricks 


Mit ausführlichen sF° 
Programmbeispielen 


Ulrich Stiehl 
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Umwandlung, Dumpen /Disassemblie- Apple Assembler 
ren, Aufwärts-Scrollen, Reset u.a. : „ 
Der dritte Teil befaßt sich mit der Spei- - Tips und Tricks - 
cherverwaltung der Language-Card ö 

von U. Stiehl 


und der Ile-64K-Karte und enthält Test- 
und Move-Programme zum Verschie- 
ben von Daten in die und aus der 
Language Card sowie der 64K-Karte, 
wobei besonders ausführlich auf die 
Softswitches eingegangen wird. 


Der vierte Teil ist dem Applesoft-ROM 
gewidmet und beschreibt die interne 
Struktur von Applesoft-Programmen, 
die Methoden der Parameterübergabe 
mittels CALL, USR, &, PEEK und POKE 
und listet dann eine große Anzahl nütz- 


232 S., 40 Programm-Listings, 
3 Abb., kart., DM 34,— 
ISBN 3-7785-1047-9 


Begleitdiskette zum Buch DM 28,— 
ISBN 3-7785-1048-7 









licher Interpreter-Adressen. Bei den .* & 
Utility-Programm liegt das Schwerge- 6 Se 
wicht auf Fliießkommamathematik ein- + IR 
schließlich Print Using. sr a? 

Der letzte Teil behandelt den Text- und ® AP 
Grafikspeicher. Neben einem profes- E2 NR 

sionellen Maskengeneratorprogramm ® KR x 


findet der Leser hier auch erstmals 
Routinen zur Double-Lores- und 
Double-Hires-Grafik des Apple Ile. 


Wir vertreten unter anderem 
folgende Firmen in Deutschland: 


PASSPORT PRODUCTS 
DesIaNS. 2 IG 
(OÖ) THUNDERWARE, INC. 





8 Mountain Computer Inc. 


<= JIitan 


TECHNOLOGIES, INC. 


L 


INTRA COMPUTER INC. 


ud 


Re KENSINGTON 


vl MICROWARE 5 CaBiosmin Compater Syataue 
© 





NTRAL POINT 
Software,Inc. 


COMPUTER STATION 


Händleranfragen erwünscht. 


pPanday®ft Dr.-Ing. Eden 


Uhlandstraße 195 - 1000 Berlin 12 - Mo-Fr 10-18 Uhr, Sa 10-13 Uhr 
Telefon: 0 30/31 04 23 - Telex: 185 859 


CORVUS OMNIDRIVE" 


od, 11, 16 oder 45 MB 
für Apple Macintosh. 
Single user Version* incl. Omninet-Transporter. 


Für Entfernungen bis zu 1 km, 
problemlos über RS 422 Zweidrahtleitung. 


CORVUS Omnidrive” 
Winchester Disk 


Omnidrive 
Massenspeicher und 
Netzwerkanschluß in 
einem Gerät. 





*ab 3. Quartal '85 aufrüstbar für Multiuser-Betrieb zum 
Vernetzen von bis zu 63 Mac's. 


Omninet Constellation Il Multiuser Version für 
gemischten Betrieb von Apple Il +, Ile, Corvus Concept, 
DEC Rainbow, TI Professional, Zenith Z 100 

IBM-PC sofort lieferbar 


Ppanday®ft:....:-- 


Uhlandstraße 195 - 1000 Berlin 12 : Mo-Fr 10-18 Uhr, Sa 10-13 Uhr 
Telefon: 0 30/3104 23 - Telex: 185859 


Accelerator Ile macht 
Ihren Apple® Il, II Plus oder Ile 
dreieinhalbmal schneller. 


Jetzt laufen VisiCalc®, Apple Writer, PASCAL, BASIC, 
Datenbanken usw. endlich ohne langen Zeitverlust. 
Stecken Sie einfach die ACCELERATOR Ile Karte 
in irgendeinen Slot und beobachten Sie, 
wir Ihr Apple loslegt! 

ACCELERATOR Ile besitzt seinen eigenen schnellen 
6502 Prozessor und 80 K-Byte Hochgeschwindigkeits- 
speicher, einschließlich einer eingebauten schnellen 
Sprachkarte und schnellem RAM-Speicherplatz für die 
ROM-Sprache. 

Direkt von Pandasoft (Titan Distributor für Deutschland) 
oder bei Ihrem Applehändler. 


Panday@ft Dr.-Ing. Eden 


Uhlandstraße 195 - 1000 Berlin 12 - Mo-Fr 10-18 Uhr, Sa 10-13 Uhr 
Telefon: 0 30/31 04 23 - Telex: 185 859 





wir haben die 
Software... 


und die 
Hardware... 


a. haben die 
Bucher... 


und die 
Zeitschriften... 


ALLES FÜR DEN APPLE II, Il*, IE 


mug Dr.-Ing. Eden 


UHLANDSTR. 195 - D- 1000 BERLIN 12 
TEL.(030) 310 423 - TELEX:185859 
Autorisierter daroka Fachhändler MICROSOFT. Distributor 
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Information und Verkauf über den Fachhandel 
erphi electronic GmbH, Dammweg 3, 8011 Großhelfendorf, tx 528 021 erphi d 
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